Anforderungen  |   Konzepte  |   Entwurf  |   Entwicklung  |   Qualitätssicherung  |   Lebenszyklus  |   Steuerung
 
 
 
 


Quelle  space_3D.prf

  Sprache: Lisp
 

(space_3D
 (conflict_symm 0
  (conflict_symm-1 nil 3471198645
   ("" (skeep)
    ((""
      (case "FORALL (s,v) : conflict?(s,v) IMPLIES conflict?(-s,-v)")
      (("1" (split)
        (("1" (flatten)
          (("1" (inst -2 "-s" "-v") (("1" (assertnil nil)) nil)) nil)
         ("2" (inst? -1) nil nil))
        nil)
       ("2" (hide 2)
        (("2" (skolem 1 ("sp" "vp"))
          (("2" (flatten)
            (("2" (expand "conflict?")
              (("2" (skeep -1)
                (("2" (inst 1 "nnt")
                  (("2" (split 1)
                    (("1" (hide -2) (("1" (grind) nil nil)) nil)
                     ("2" (hide -1) (("2" (grind) nil nil)) nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((- const-decl "Vector" vectors_3D "vectors/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (conflict? const-decl "bool" space_3D nil)
    (IMPLIES const-decl "[bool, bool -> bool]" booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (boolean nonempty-type-decl nil booleans nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (real nonempty-type-from-decl nil reals nil)
    (neg_neg formula-decl nil vectors_3D "vectors/")
    (real_times_real_is_real application-judgement "real" reals nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (nnreal type-eq-decl nil real_types nil)
    (>= const-decl "bool" reals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number nonempty-type-decl nil numbers nil)
    (sq_nz_pos application-judgement "posreal" sq "reals/")
    (posreal_times_posreal_is_posreal application-judgement "posreal"
     real_types nil)
    (sq const-decl "nonneg_real" sq "reals/")
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (+ const-decl "Vector" vectors_2D "vectors/")
    (* const-decl "Vector" vectors_2D "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (abs const-decl "{n: nonneg_real | n >= m AND n >= -m}" real_defs
         nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (minus_real_is_real application-judgement "real" reals nil))
   shostak))
 (conflict_ever 0
  (conflict_ever-1 nil 3470158403
   ("" (skeep)
    (("" (expand"conflict?" "conflict_ever?")
      (("" (skeep -1) (("" (inst? 1) (("" (assertnil nil)) nil))
        nil))
      nil))
    nil)
   ((conflict_ever? const-decl "bool" space_3D nil)
    (real_times_real_is_real application-judgement "real" reals nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (conflict? const-decl "bool" space_3D nil)
    (number nonempty-type-decl nil numbers nil)
    (boolean nonempty-type-decl nil booleans nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (>= const-decl "bool" reals nil)
    (nnreal type-eq-decl nil real_types nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (sq_nz_pos application-judgement "posreal" sq "reals/"))
   nil))
 (conflict_ever_shift 0
  (conflict_ever_shift-1 nil 3470158447
   ("" (skeep)
    (("" (split)
      (("1" (flatten)
        (("1" (expand "conflict_ever?")
          (("1" (skolem -1 "tt")
            (("1" (inst 1 "tt-t")
              (("1" (flatten)
                (("1" (split)
                  (("1" (hide -2)
                    (("1" (expand"+" "*") (("1" (assertnil nil))
                      nil))
                    nil)
                   ("2" (hide -1)
                    (("2" (rewrite "vect2_add")
                      (("2" (rewrite "vect2_scal")
                        (("2"
                          (case-replace
                           "vect2(s) + tt * vect2(v) = vect2(s) + t * vect2(v) + (tt - t) * vect2(v)")
                          (("2" (hide-all-but 1)
                            (("2" (grind) nil nil)) nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil)
       ("2" (flatten)
        (("2" (expand "conflict_ever?")
          (("2" (skolem -1 "tt")
            (("2" (inst 1 "tt+t")
              (("2" (flatten)
                (("2" (split)
                  (("1" (hide -2)
                    (("1" (expand"+" "*") (("1" (assertnil nil))
                      nil))
                    nil)
                   ("2" (hide -1)
                    (("2"
                      (case-replace
                       "vect2(s + t * v) + tt * vect2(v) = vect2(s) + (tt + t) * vect2(v)")
                      (("2" (hide-all-but 1)
                        (("2" (rewrite "vect2_add")
                          (("2" (rewrite "vect2_scal")
                            (("2" (grind) nil nil)) nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((real_times_real_is_real application-judgement "real" reals nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (conflict_ever? const-decl "bool" space_3D nil)
    (real_minus_real_is_real application-judgement "real" reals nil)
    (number nonempty-type-decl nil numbers nil)
    (boolean nonempty-type-decl nil booleans nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (- const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (* const-decl "Vector" vectors_3D "vectors/")
    (+ const-decl "Vector" vectors_3D "vectors/")
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (vect2_add formula-decl nil vect_3D_2D "vectors/")
    (* const-decl "Vector" vectors_2D "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (+ const-decl "Vector" vectors_2D "vectors/")
    (= const-decl "[T, T -> boolean]" equalities nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (vect2_scal formula-decl nil vect_3D_2D "vectors/")
    (+ const-decl "[numfield, numfield -> numfield]" number_fields
       nil))
   nil))
 (conflict_sum_closed 0
  (conflict_sum_closed-2 nil 3467454344
   ("" (skeep)
    (("" (expand "conflict?")
      (("" (skosimp*)
        (("" (case "nnt!1 = 0 and nnt!2 = 0")
          (("1" (flatten)
            (("1" (inst + "0")
              (("1" (assert)
                (("1" (replace -1) (("1" (assertnil nil)) nil)) nil))
              nil))
            nil)
           ("2" (name "tt" "nnt!2/(nnt!1 + nnt!2)")
            (("1" (label "ttname" -1)
              (("1" (case "0<=tt AND tt<=1")
                (("1" (flatten)
                  (("1" (name "newt" "(nnt!1*nnt!2)/(nnt!1 + nnt!2)")
                    (("1" (label "newtname" -1)
                      (("1"
                        (case "tt*nnt!1 = newt AND (1-tt)*nnt!2 = newt")
                        (("1" (flatten)
                          (("1" (label "newttt" -1)
                            (("1" (label "newtomtt" -2)
                              (("1"
                                (inst + "newt")
                                (("1"
                                  (name
                                   "VV"
                                   "vect2(s) + nnt!1 * vect2(v)")
                                  (("1"
                                    (label "vvname" -1)
                                    (("1"
                                      (name
                                       "WW"
                                       "vect2(s) + nnt!2 * vect2(w)")
                                      (("1"
                                        (label "wwname" -1)
                                        (("1"
                                          (name
                                           "VVz"
                                           "s`z + nnt!1 * v`z")
                                          (("1"
                                            (label "vvzname" -1)
                                            (("1"
                                              (name
                                               "WWz"
                                               "s`z + nnt!2 * w`z")
                                              (("1"
                                                (label "wwzname" -1)
                                                (("1"
                                                  (name
                                                   "VVt"
                                                   "s+nnt!1*v")
                                                  (("1"
                                                    (label
                                                     "vvtname"
                                                     -1)
                                                    (("1"
                                                      (name
                                                       "WWt"
                                                       "s+nnt!2*w")
                                                      (("1"
                                                        (label
                                                         "wwtname"
                                                         -1)
                                                        (("1"
                                                          (replace
                                                           "wwzname")
                                                          (("1"
                                                            (replace
                                                             "vvzname")
                                                            (("1"
                                                              (replace
                                                               "wwname")
                                                              (("1"
                                                                (replace
                                                                 "vvname")
                                                                (("1"
                                                                  (lemma
                                                                   "horiz_dist_convex_scaf")
                                                                  (("1"
                                                                    (inst
                                                                     -
                                                                     "VVt"
                                                                     "WWt-VVt")
                                                                    (("1"
                                                                      (case
                                                                       "s`z + newt * (v + w)`z = tt*VVz + (1-tt)*WWz AND vect2(s) + newt * vect2(v + w) = tt*VV+(1-tt)*WW")
                                                                      (("1"
                                                                        (flatten)
                                                                        (("1"
                                                                          (label
                                                                           "zfin"
                                                                           -1)
                                                                          (("1"
                                                                            (label
                                                                             "vectfin"
                                                                             -2)
                                                                            (("1"
                                                                              (replace
                                                                               "zfin")
                                                                              (("1"
                                                                                (replace
                                                                                 "vectfin")
                                                                                (("1"
                                                                                  (case
                                                                                   "convex?(LAMBDA (t): abs(t)-H)")
                                                                                  (("1"
                                                                                    (assert)
                                                                                    (("1"
                                                                                      (lemma
                                                                                       "convex_wtd_av_lt")
                                                                                      (("1"
                                                                                        (inst-cp
                                                                                         -
                                                                                         "0"
                                                                                         "LAMBDA (t): abs(t) - H"
                                                                                         "VVz"
                                                                                         "WWz")
                                                                                        (("1"
                                                                                          (inst
                                                                                           -
                                                                                           "0"
                                                                                           "LAMBDA (t): horiz_dist_scaf(VVt)(t, WWt - VVt)"
                                                                                           "0"
                                                                                           "1")
                                                                                          (("1"
                                                                                            (assert)
                                                                                            (("1"
                                                                                              (expand
                                                                                               "horiz_dist_scaf"
                                                                                               -1
                                                                                               1)
                                                                                              (("1"
                                                                                                (expand
                                                                                                 "horiz_dist_scaf"
                                                                                                 -1
                                                                                                 1)
                                                                                                (("1"
                                                                                                  (assert)
                                                                                                  (("1"
                                                                                                    (case
                                                                                                     "vect2(VVt) = VV AND vect2(VVt)+vect2(WWt-VVt) = WW")
                                                                                                    (("1"
                                                                                                      (flatten)
                                                                                                      (("1"
                                                                                                        (assert)
                                                                                                        (("1"
                                                                                                          (inst
                                                                                                           -
                                                                                                           "tt")
                                                                                                          (("1"
                                                                                                            (inst
                                                                                                             -
                                                                                                             "tt")
                                                                                                            (("1"
                                                                                                              (assert)
                                                                                                              (("1"
                                                                                                                (expand
                                                                                                                 "horiz_dist_scaf")
                                                                                                                (("1"
                                                                                                                  (case-replace
                                                                                                                   "vect2(VVt) + (1 - tt) * vect2(WWt - VVt) = tt * VV + (1 - tt) * WW")
                                                                                                                  (("1"
                                                                                                                    (assert)
                                                                                                                    nil
                                                                                                                    nil)
                                                                                                                   ("2"
                                                                                                                    (hide-all-but
                                                                                                                     (-1
                                                                                                                      -2
                                                                                                                      1))
                                                                                                                    (("2"
                                                                                                                      (grind)
                                                                                                                      nil
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("2"
                                                                                                      (hide-all-but
                                                                                                       ("vvtname"
                                                                                                        "vvname"
                                                                                                        "wwtname"
                                                                                                        "wwname"
                                                                                                        1))
                                                                                                      (("2"
                                                                                                        (replace
                                                                                                         "wwtname"
                                                                                                         +
                                                                                                         rl)
                                                                                                        (("2"
                                                                                                          (replace
                                                                                                           "vvtname"
                                                                                                           +
                                                                                                           rl)
                                                                                                          (("2"
                                                                                                            (replace
                                                                                                             "vvname"
                                                                                                             +
                                                                                                             rl)
                                                                                                            (("2"
                                                                                                              (replace
                                                                                                               "wwname"
                                                                                                               +
                                                                                                               rl)
                                                                                                              (("2"
                                                                                                                (rewrite
                                                                                                                 "vect2_add")
                                                                                                                (("2"
                                                                                                                  (rewrite
                                                                                                                   "vect2_sub")
                                                                                                                  (("2"
                                                                                                                    (rewrite
                                                                                                                     "vect2_add")
                                                                                                                    (("2"
                                                                                                                      (rewrite
                                                                                                                       "vect2_add")
                                                                                                                      (("2"
                                                                                                                        (rewrite
                                                                                                                         "vect2_scal")
                                                                                                                        (("2"
                                                                                                                          (rewrite
                                                                                                                           "vect2_scal")
                                                                                                                          (("2"
                                                                                                                            (hide-all-but
                                                                                                                             1)
                                                                                                                            (("2"
                                                                                                                              (grind)
                                                                                                                              nil
                                                                                                                              nil))
                                                                                                                            nil))
                                                                                                                          nil))
                                                                                                                        nil))
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil)
                                                                                   ("2"
                                                                                    (lemma
                                                                                     "abs_linear_convex")
                                                                                    (("2"
                                                                                      (inst
                                                                                       -
                                                                                       "H"
                                                                                       "0"
                                                                                       "1")
                                                                                      (("2"
                                                                                        (assert)
                                                                                        nil
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil)
                                                                       ("2"
                                                                        (replace
                                                                         "vvname"
                                                                         +
                                                                         rl)
                                                                        (("2"
                                                                          (replace
                                                                           "wwname"
                                                                           +
                                                                           rl)
                                                                          (("2"
                                                                            (replace
                                                                             "vvzname"
                                                                             +
                                                                             rl)
                                                                            (("2"
                                                                              (replace
                                                                               "wwzname"
                                                                               +
                                                                               rl)
                                                                              (("2"
                                                                                (assert)
                                                                                (("2"
                                                                                  (hide
                                                                                   (2
                                                                                    3
                                                                                    4
                                                                                    5))
                                                                                  (("2"
                                                                                    (split
                                                                                     1)
                                                                                    (("1"
                                                                                      (copy
                                                                                       "newtomtt")
                                                                                      (("1"
                                                                                        (mult-by
                                                                                         -1
                                                                                         "w`z")
                                                                                        (("1"
                                                                                          (assert)
                                                                                          (("1"
                                                                                            (replace
                                                                                             -1)
                                                                                            (("1"
                                                                                              (hide
                                                                                               -1)
                                                                                              (("1"
                                                                                                (replace
                                                                                                 "newttt"
                                                                                                 +
                                                                                                 rl)
                                                                                                (("1"
                                                                                                  (rewrite
                                                                                                   "vz_distr_add")
                                                                                                  (("1"
                                                                                                    (assert)
                                                                                                    nil
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil)
                                                                                     ("2"
                                                                                      (hide-all-but
                                                                                       ("newttt"
                                                                                        "newtomtt"
                                                                                        1))
                                                                                      (("2"
                                                                                        (grind)
                                                                                        nil
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil)
                                 ("2"
                                  (lemma
                                   "nnreal_div_posreal_is_nnreal")
                                  (("2"
                                    (inst
                                     -
                                     "(nnt!1*nnt!2)"
                                     "nnt!1 + nnt!2")
                                    (("1"
                                      (hide-all-but (-1 "newtname" 1))
                                      (("1" (grind) nil nil))
                                      nil)
                                     ("2" (assertnil nil))
                                    nil))
                                  nil))
                                nil))
                              nil))
                            nil))
                          nil)
                         ("2" (replace "newtname" + rl)
                          (("2" (replace "ttname" + rl)
                            (("2" (hide-all-but (1 2))
                              (("2"
                                (ground)
                                (("2" (field 2) nil nil))
                                nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil)
                 ("2" (lemma "nnreal_div_posreal_is_nnreal")
                  (("2" (inst - "nnt!2" "nnt!1 + nnt!2")
                    (("1" (replace "ttname" -)
                      (("1" (assert)
                        (("1" (replace "ttname" + rl)
                          (("1" (cross-mult 1) (("1" (assertnil nil))
                            nil))
                          nil))
                        nil))
                      nil)
                     ("2" (assertnil nil))
                    nil))
                  nil))
                nil))
              nil)
             ("2" (assertnil nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((real_times_real_is_real application-judgement "real" reals nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (conflict? const-decl "bool" space_3D nil)
    (nnreal type-eq-decl nil real_types nil)
    (>= const-decl "bool" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (= const-decl "[T, T -> boolean]" equalities nil)
    (number nonempty-type-decl nil numbers nil)
    (AND const-decl "[bool, bool -> bool]" booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (boolean nonempty-type-decl nil booleans nil)
    (add_zero_right formula-decl nil vectors_2D "vectors/")
    (scal_0 formula-decl nil vectors_2D "vectors/")
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (sq_nz_pos application-judgement "posreal" sq "reals/")
    (div_mult_pos_le1 formula-decl nil real_props nil)
    (TRUE const-decl "bool" booleans nil)
    (id const-decl "(bijective?[T, T])" identity nil)
    (bijective? const-decl "bool" functions nil)
    (div_cancel2 formula-decl nil real_props nil)
    (nonzero_real nonempty-type-eq-decl nil reals nil)
    (both_sides_times1 formula-decl nil real_props nil)
    (minus_odd_is_odd application-judgement "odd_int" integers nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (nnreal_div_posreal_is_nnreal judgement-tcc nil real_types nil)
    (nnt!2 skolem-const-decl "nnreal" space_3D nil)
    (nnt!1 skolem-const-decl "nnreal" space_3D nil)
    (real_gt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (+ const-decl "Vector" vectors_2D "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (* const-decl "Vector" vectors_2D "vectors/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (+ const-decl "Vector" vectors_3D "vectors/")
    (* const-decl "Vector" vectors_3D "vectors/")
    (real_minus_real_is_real application-judgement "real" reals nil)
    (nnreal_times_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (horiz_dist_convex_scaf formula-decl nil horizontal_dist_convexity
     nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (> const-decl "bool" reals nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (D formal-const-decl "posreal" space_3D nil)
    (convex? const-decl "bool" convex_functions "reals/")
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (abs const-decl "{n: nonneg_real | n >= m AND n >= -m}" real_defs
         nil)
    (H formal-const-decl "posreal" space_3D nil)
    (convex_wtd_av_lt formula-decl nil convex_functions "reals/")
    (horiz_dist_scaf const-decl "real" horizontal_dist_convexity nil)
    (scal_1 formula-decl nil vectors_2D "vectors/")
    (vect2_sub formula-decl nil vect_3D_2D "vectors/")
    (- const-decl "Vector" vectors_2D "vectors/")
    (vect2_scal formula-decl nil vect_3D_2D "vectors/")
    (vect2_add formula-decl nil vect_3D_2D "vectors/")
    (real_le_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (abs_linear_convex formula-decl nil convex_functions "reals/")
    (vz_distr_add formula-decl nil vectors_3D "vectors/")
    (both_sides_times1_imp formula-decl nil extra_real_props nil)
    (- const-decl "Vector" vectors_3D "vectors/")
    (newt skolem-const-decl "real" space_3D nil)
    (- const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (* const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (<= const-decl "bool" reals nil)
    (+ const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (/ const-decl "[numfield, nznum -> numfield]" number_fields nil)
    (nznum nonempty-type-eq-decl nil number_fields nil)
    (/= const-decl "boolean" notequal nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (real_div_nzreal_is_real application-judgement "real" reals nil)
    (nnreal_plus_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil))
   nil)
  (conflict_sum_closed-1 nil 3467382877
   ("" (skeep)
    (("" (expand "conflict?")
      (("" (skolem -1 "ntt1")
        (("" (skolem -2 "ntt2")
          (("" (flatten)
            (("" (rewrite "vect2_add") (("" (postpone) nil nil)) nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   nil shostak))
 (conflict_is_an_open_set 0
  (conflict_is_an_open_set-1 nil 3566319824
   ("" (skeep)
    (("" (expand "conflict?" -1)
      (("" (skosimp*)
        (("" (label "underH" -1)
          (("" (label "underD" -2)
            (("" (case "nnt!1 /= 0")
              (("1" (flatten)
                (("1" (name "del1" "H - abs(ss`z + nnt!1 * vv`z)")
                  (("1" (label "del1name" -1)
                    (("1"
                      (name "del2"
                            "D - norm(vect2(ss) + nnt!1 * vect2(vv))")
                      (("1" (label "del2name" -1)
                        (("1" (case "del2 > 0")
                          (("1" (label "del2pos" -1)
                            (("1" (hide "del2pos")
                              (("1"
                                (name "delta" "min(del1,del2)")
                                (("1"
                                  (label "deltaname" -1)
                                  (("1"
                                    (inst + "delta/(2*nnt!1)")
                                    (("1"
                                      (skeep 2)
                                      (("1"
                                        (case
                                         "norm(ww) >= abs(ww`z) AND norm(ww) >= norm(vect2(ww))")
                                        (("1"
                                          (label "normlem" -1)
                                          (("1"
                                            (hide "normlem")
                                            (("1"
                                              (expand "conflict?")
                                              (("1"
                                                (inst + "nnt!1")
                                                (("1"
                                                  (split 2)
                                                  (("1"
                                                    (lemma "triangle")
                                                    (("1"
                                                      (rewrite
                                                       "vz_distr_add")
                                                      (("1"
                                                        (assert)
                                                        (("1"
                                                          (inst
                                                           -
                                                           "ss`z + vv`z*nnt!1"
                                                           "ww`z*nnt!1")
                                                          (("1"
                                                            (case
                                                             "abs(ww`z*nnt!1) < del1")
                                                            (("1"
                                                              (assert)
                                                              nil
                                                              nil)
                                                             ("2"
                                                              (hide 2)
                                                              (("2"
                                                                (rewrite
                                                                 "abs_mult")
                                                                (("2"
                                                                  (case
                                                                   "abs(nnt!1) = nnt!1")
                                                                  (("1"
                                                                    (replace
                                                                     -1)
                                                                    (("1"
                                                                      (reveal
                                                                       "normlem")
                                                                      (("1"
                                                                        (flatten)
                                                                        (("1"
                                                                          (div-by
                                                                           1
                                                                           "nnt!1")
                                                                          (("1"
                                                                            (case
                                                                             "del1 / nnt!1 >= delta / (2 * nnt!1)")
                                                                            (("1"
                                                                              (assert)
                                                                              nil
                                                                              nil)
                                                                             ("2"
                                                                              (hide
                                                                               2)
                                                                              (("2"
                                                                                (cross-mult
                                                                                 1)
                                                                                (("2"
                                                                                  (div-by
                                                                                   1
                                                                                   "nnt!1")
                                                                                  (("2"
                                                                                    (assert)
                                                                                    nil
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil)
                                                                   ("2"
                                                                    (expand
                                                                     "abs")
                                                                    (("2"
                                                                      (propax)
                                                                      nil
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil)
                                                   ("2"
                                                    (case
                                                     "norm(vect2(ss) + nnt!1 * vect2(vv + ww)) < D")
                                                    (("1"
                                                      (lemma "sq_lt")
                                                      (("1"
                                                        (inst?)
                                                        (("1"
                                                          (assert)
                                                          (("1"
                                                            (lemma
                                                             "vectors_2D.sqrt_sqv_norm")
                                                            (("1"
                                                              (inst?)
                                                              (("1"
                                                                (replace
                                                                 -1
                                                                 :dir
                                                                 rl)
                                                                (("1"
                                                                  (rewrite
                                                                   "vect2_add")
                                                                  (("1"
                                                                    (assert)
                                                                    nil
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil)
                                                     ("2"
                                                      (hide 2)
                                                      (("2"
                                                        (rewrite
                                                         "vect2_add")
                                                        (("2"
                                                          (lemma
                                                           "vectors_2D.norm_add_le")
                                                          (("2"
                                                            (inst
                                                             -
                                                             "vect2(ss) + nnt!1*vect2(vv)"
                                                             "nnt!1*vect2(ww)")
                                                            (("2"
                                                              (assert)
                                                              (("2"
                                                                (case
                                                                 "norm(nnt!1 * vect2(ww)) + norm(vect2(ss) + nnt!1 * vect2(vv)) < D")
                                                                (("1"
                                                                  (case
                                                                   "vect2(ss) + nnt!1 * vect2(vv) + nnt!1 * vect2(ww) = vect2(ss) + nnt!1 * (vect2(vv) + vect2(ww))")
                                                                  (("1"
                                                                    (assert)
                                                                    nil
                                                                    nil)
                                                                   ("2"
                                                                    (hide
                                                                     2)
                                                                    (("2"
                                                                      (hide-all-but
                                                                       1)
                                                                      (("2"
                                                                        (grind)
                                                                        nil
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil)
                                                                 ("2"
                                                                  (case
                                                                   "norm(nnt!1*vect2(ww)) < del2")
                                                                  (("1"
                                                                    (assert)
                                                                    nil
                                                                    nil)
                                                                   ("2"
                                                                    (hide
                                                                     2)
                                                                    (("2"
                                                                      (hide
                                                                       2)
                                                                      (("2"
                                                                        (rewrite
                                                                         "norm_scal")
                                                                        (("2"
                                                                          (case
                                                                           "abs(nnt!1) = nnt!1")
                                                                          (("1"
                                                                            (replace
                                                                             -1)
                                                                            (("1"
                                                                              (div-by
                                                                               1
                                                                               "nnt!1")
                                                                              (("1"
                                                                                (case
                                                                                 "del2 / nnt!1 >= delta/(2*nnt!1)")
                                                                                (("1"
                                                                                  (reveal
                                                                                   "normlem")
                                                                                  (("1"
                                                                                    (flatten)
                                                                                    (("1"
                                                                                      (assert)
                                                                                      nil
                                                                                      nil))
                                                                                    nil))
                                                                                  nil)
                                                                                 ("2"
                                                                                  (hide
                                                                                   2)
                                                                                  (("2"
                                                                                    (cross-mult
                                                                                     1)
                                                                                    (("2"
                                                                                      (div-by
                                                                                       1
                                                                                       "nnt!1")
                                                                                      (("2"
                                                                                        (case
                                                                                         "2*del2 >= delta")
                                                                                        (("1"
                                                                                          (assert)
                                                                                          nil
                                                                                          nil)
                                                                                         ("2"
                                                                                          (case
                                                                                           "del2 > 0")
                                                                                          (("1"
                                                                                            (hide-all-but
                                                                                             (-1
                                                                                              "deltaname"
                                                                                              1))
                                                                                            (("1"
                                                                                              (grind)
                                                                                              nil
                                                                                              nil))
                                                                                            nil)
                                                                                           ("2"
                                                                                            (replace
                                                                                             "del2name"
                                                                                             :dir
                                                                                             rl)
                                                                                            (("2"
                                                                                              (hide-all-but
                                                                                               ("underD"
                                                                                                1))
                                                                                              (("2"
                                                                                                (case
                                                                                                 "sqv(vect2(ss) + nnt!1 * vect2(vv)) = sq(norm(vect2(ss) + nnt!1 * vect2(vv)))")
                                                                                                (("1"
                                                                                                  (replace
                                                                                                   -1)
                                                                                                  (("1"
                                                                                                    (hide
                                                                                                     -1)
                                                                                                    (("1"
                                                                                                      (lemma
                                                                                                       "sq_lt")
                                                                                                      (("1"
                                                                                                        (inst?)
                                                                                                        (("1"
                                                                                                          (assert)
                                                                                                          nil
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil)
                                                                                                 ("2"
                                                                                                  (hide-all-but
                                                                                                   1)
                                                                                                  (("2"
                                                                                                    (name
                                                                                                     "cvect1"
                                                                                                     "vect2(ss) + nnt!1 * vect2(vv)")
                                                                                                    (("2"
                                                                                                      (replace
                                                                                                       -1)
                                                                                                      (("2"
                                                                                                        (hide
                                                                                                         -1)
                                                                                                        (("2"
                                                                                                          (expand
                                                                                                           "norm")
                                                                                                          (("2"
                                                                                                            (lemma
                                                                                                             "sq_sqrt")
                                                                                                            (("2"
                                                                                                              (inst?)
                                                                                                              (("2"
                                                                                                                (split
                                                                                                                 -1)
                                                                                                                (("1"
                                                                                                                  (assert)
                                                                                                                  nil
                                                                                                                  nil)
                                                                                                                 ("2"
                                                                                                                  (assert)
                                                                                                                  nil
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil)
                                                                           ("2"
                                                                            (expand
                                                                             "abs")
                                                                            (("2"
                                                                              (propax)
                                                                              nil
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil)
                                         ("2"
                                          (hide-all-but 1)
                                          (("2"
                                            (split)
                                            (("1"
                                              (expand "norm")
                                              (("1"
                                                (expand "sqv")
                                                (("1"
                                                  (lemma "sq_ge")
                                                  (("1"
                                                    (inst?)
                                                    (("1"
                                                      (assert)
                                                      (("1"
                                                        (hide 2)
                                                        (("1"
                                                          (expand "*")
                                                          (("1"
                                                            (expand
                                                             "sq"
                                                             1
                                                             2)
                                                            (("1"
                                                              (lemma
                                                               "sqrt_ge")
                                                              (("1"
                                                                (inst
                                                                 -
                                                                 "ww`x * ww`x + ww`y * ww`y + ww`z * ww`z"
                                                                 "ww`z*ww`z")
                                                                (("1"
                                                                  (assert)
                                                                  nil
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil)
                                                     ("2"
                                                      (typepred
                                                       "sqv(ww)")
                                                      (("2"
                                                        (expand "sqv")
                                                        (("2"
                                                          (propax)
                                                          nil
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil)
                                             ("2"
                                              (expand "norm")
                                              (("2"
                                                (expand "sqv")
                                                (("2"
                                                  (lemma "sqrt_ge")
                                                  (("2"
                                                    (inst?)
                                                    (("1"
                                                      (assert)
                                                      (("1"
                                                        (hide 2)
                                                        (("1"
                                                          (grind)
                                                          nil
                                                          nil))
                                                        nil))
                                                      nil)
                                                     ("2"
                                                      (typepred
                                                       "sqv(vect2(ww))")
                                                      (("2"
                                                        (expand "sqv")
                                                        (("2"
                                                          (propax)
                                                          nil
                                                          nil))
                                                        nil))
                                                      nil)
                                                     ("3"
                                                      (typepred
                                                       "sqv(ww)")
                                                      (("3"
                                                        (expand "sqv")
                                                        (("3"
                                                          (propax)
                                                          nil
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil)
                                     ("2"
                                      (case "delta /( 2*nnt!1) > 0")
                                      (("1" (assertnil nil)
                                       ("2"
                                        (hide 2)
                                        (("2"
                                          (cross-mult 1)
                                          (("2"
                                            (reveal "del2pos")
                                            (("2"
                                              (case
                                               "delta = del1 or delta = del2")
                                              (("1" (ground) nil nil)
                                               ("2"
                                                (hide-all-but
                                                 ("deltaname" 1))
                                                (("2" (grind) nil nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil)
                                       ("3" (assertnil nil))
                                      nil)
                                     ("3" (assertnil nil))
                                    nil))
                                  nil))
                                nil))
                              nil))
                            nil)
                           ("2" (lemma "sq_lt")
                            (("2"
                              (inst -
                               "norm(vect2(ss) + nnt!1 * vect2(vv))"
                               "D")
                              (("2"
                                (assert)
                                (("2"
                                  (name
                                   "cvect3"
                                   "vect2(ss) + nnt!1 * vect2(vv)")
                                  (("2"
                                    (replace -1)
                                    (("2"
                                      (case
                                       "sqv(cvect3) = sq(norm(cvect3))")
                                      (("1" (assertnil nil)
                                       ("2"
                                        (hide-all-but 1)
                                        (("2"
                                          (lemma
                                           "vectors_2D.sqrt_sqv_norm")
                                          (("2"
                                            (inst?)
                                            (("2"
                                              (replace -1 :dir rl)
                                              (("2"
                                                (hide -1)
                                                (("2"
                                                  (lemma "sq_sqrt")
                                                  (("2"
                                                    (inst?)
                                                    (("2"
                                                      (split -1)
                                                      (("1"
                                                        (assert)
                                                        nil
                                                        nil)
                                                       ("2"
                                                        (assert)
                                                        nil
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil))
                                nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil)
               ("2" (flatten)
                (("2" (replace -1)
                  (("2" (assert)
                    (("2" (inst + "1")
                      (("2" (skeep)
                        (("2" (expand "conflict?")
                          (("2" (inst + "0") (("2" (assertnil nil))
                            nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((real_times_real_is_real application-judgement "real" reals nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (conflict? const-decl "bool" space_3D nil)
    (nnreal type-eq-decl nil real_types nil)
    (>= const-decl "bool" reals nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (real nonempty-type-from-decl nil reals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (/= const-decl "boolean" notequal nil)
    (boolean nonempty-type-decl nil booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (* const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (+ const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (abs const-decl "{n: nonneg_real | n >= m AND n >= -m}" real_defs
         nil)
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (AND const-decl "[bool, bool -> bool]" booleans nil)
    (H formal-const-decl "posreal" space_3D nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (> const-decl "bool" reals nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (- const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (= const-decl "[T, T -> boolean]" equalities nil)
    (real_minus_real_is_real application-judgement "real" reals nil)
    (D formal-const-decl "posreal" space_3D nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (norm const-decl "nnreal" vectors_2D "vectors/")
    (+ const-decl "Vector" vectors_2D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (* const-decl "Vector" vectors_2D "vectors/")
    (div_mult_pos_gt1 formula-decl nil extra_real_props nil)
    (OR const-decl "[bool, bool -> bool]" booleans nil)
    (* const-decl "real" vectors_2D "vectors/")
    (sq_ge formula-decl nil sq "reals/")
    (NOT const-decl "[bool -> bool]" booleans nil)
    (sq_abs formula-decl nil sq "reals/")
    (sqrt_ge formula-decl nil sqrt "reals/")
    (sqrt const-decl "{nnz: nnreal | nnz * nnz = nnx}" sqrt "reals/")
    (ww skolem-const-decl "Vect3" space_3D nil)
    (* const-decl "real" vectors_3D "vectors/")
    (sqv const-decl "nnreal" vectors_3D "vectors/")
    (vz_distr_add formula-decl nil vectors_3D "vectors/")
    (both_sides_div_pos_lt1 formula-decl nil real_props nil)
    (times_div_cancel2 formula-decl nil extra_real_props nil)
    (nonzero_real nonempty-type-eq-decl nil reals nil)
    (both_sides_div_pos_ge1 formula-decl nil real_props nil)
    (div_mult_pos_ge2 formula-decl nil real_props nil)
    (times_div2 formula-decl nil real_props nil)
    (div_mult_pos_ge1 formula-decl nil real_props nil)
    (abs_mult formula-decl nil real_props nil)
    (nnreal_plus_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (real_le_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (< const-decl "bool" reals nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (sq_nz_pos application-judgement "posreal" sq "reals/")
    (triangle formula-decl nil real_props nil)
    (norm_add_le formula-decl nil vectors_2D "vectors/")
    (times_div_cancel1 formula-decl nil extra_real_props nil)
    (sq const-decl "nonneg_real" sq "reals/")
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (norm_scal formula-decl nil vectors_2D "vectors/")
    (sq_lt formula-decl nil sq "reals/")
    (vect2_add formula-decl nil vect_3D_2D "vectors/")
    (sq_sqrt formula-decl nil sqrt "reals/")
    (sqrt_sqv_norm formula-decl nil vectors_2D "vectors/")
    (+ const-decl "Vector" vectors_3D "vectors/")
    (norm const-decl "nnreal" vectors_3D "vectors/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (delta skolem-const-decl "{p: real | p <= del1 AND p <= del2}"
     space_3D nil)
    (del2 skolem-const-decl "real" space_3D nil)
    (del1 skolem-const-decl "real" space_3D nil)
    (/ const-decl "[numfield, nznum -> numfield]" number_fields nil)
    (nznum nonempty-type-eq-decl nil number_fields nil)
    (nnt!1 skolem-const-decl "nnreal" space_3D nil)
    (nnreal_times_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (real_div_nzreal_is_real application-judgement "real" reals nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (real_gt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (min const-decl "{p: real | p <= m AND p <= n}" real_defs nil)
    (<= const-decl "bool" reals nil)
    (add_zero_right formula-decl nil vectors_2D "vectors/")
    (scal_0 formula-decl nil vectors_2D "vectors/"))
   nil))
 (vertical_horizontal_conflict 0
  (vertical_horizontal_conflict-1 nil 3432042079
   ("" (skeep)
    (("" (expand "conflict?")
      (("" (skeep -1)
        (("" (split)
          (("1" (expand "vertical_conflict?") (("1" (inst? 1) nil nil))
            nil)
           ("2" (expand "horizontal_conflict?")
            (("2" (inst? 1) nil nil)) nil))
          nil))
        nil))
      nil))
    nil)
   ((real_times_real_is_real application-judgement "real" reals nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (conflict? const-decl "bool" space_3D nil)
    (nnreal type-eq-decl nil real_types nil)
    (>= const-decl "bool" reals nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (real nonempty-type-from-decl nil reals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (boolean nonempty-type-decl nil booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (vertical_conflict? const-decl "bool" vertical nil)
    (horizontal_conflict? const-decl "bool" horizontal nil))
   shostak))
 (neg_spz 0
  (neg_spz-1 nil 3451660364 ("" (grind) nil nil)
   ((boolean nonempty-type-decl nil booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (>= const-decl "bool" reals nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (AND const-decl "[bool, bool -> bool]" booleans nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (> const-decl "bool" reals nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (H formal-const-decl "posreal" space_3D nil)
    (Spz_vect3 type-eq-decl nil space_3D nil)
    (minus_real_is_real application-judgement "real" reals nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (- const-decl "Vector" vectors_3D "vectors/")
    (abs const-decl "{n: nonneg_real | n >= m AND n >= -m}" real_defs
         nil))
   nil))
 (neg_sp2 0
  (neg_sp2-1 nil 3471185533 ("" (judgement-tcc) nil nil)
   ((boolean nonempty-type-decl nil booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (>= const-decl "bool" reals nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (nnreal type-eq-decl nil real_types nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (> const-decl "bool" reals nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (D formal-const-decl "posreal" space_3D nil)
    (Sp2_vect3 type-eq-decl nil space_3D nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (sq_nz_pos application-judgement "posreal" sq "reals/")
    (posreal_times_posreal_is_posreal application-judgement "posreal"
     real_types nil)
    (- const-decl "Vector" vectors_3D "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (minus_real_is_real application-judgement "real" reals nil)
    (real_times_real_is_real application-judgement "real" reals nil))
   nil))
 (neg_sp 0
  (neg_sp-1 nil 3471185533 ("" (grind) nil nil)
   ((boolean nonempty-type-decl nil booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (OR const-decl "[bool, bool -> bool]" booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (>= const-decl "bool" reals nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (AND const-decl "[bool, bool -> bool]" booleans nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (> const-decl "bool" reals nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (H formal-const-decl "posreal" space_3D nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (nnreal type-eq-decl nil real_types nil)
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (D formal-const-decl "posreal" space_3D nil)
    (Sp_vect3 type-eq-decl nil space_3D nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (posreal_times_posreal_is_posreal application-judgement "posreal"
     real_types nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (- const-decl "Vector" vectors_3D "vectors/")
    (abs const-decl "{n: nonneg_real | n >= m AND n >= -m}" real_defs
         nil)
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (minus_real_is_real application-judgement "real" reals nil)
    (real_times_real_is_real application-judgement "real" reals nil))
   nil))
 (spv2 0
  (spv2-1 nil 3471198643 ("" (judgement-tcc) nil nil)
   ((boolean nonempty-type-decl nil booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (>= const-decl "bool" reals nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (nnreal type-eq-decl nil real_types nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (> const-decl "bool" reals nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (D formal-const-decl "posreal" space_3D nil)
    (Sp2_vect3 type-eq-decl nil space_3D nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (sq_nz_pos application-judgement "posreal" sq "reals/")
    (posreal_times_posreal_is_posreal application-judgement "posreal"
     real_types nil)
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (real_times_real_is_real application-judgement "real" reals nil))
   nil))
 (ssv2 0
  (ssv2-1 nil 3432553796 ("" (skosimp :preds? t) nil nil)
   ((Ss2_vect3 type-eq-decl nil space_3D nil)
    (D formal-const-decl "posreal" space_3D nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (sq const-decl "nonneg_real" sq "reals/")
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (nnreal type-eq-decl nil real_types nil)
    (>= const-decl "bool" reals nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (> const-decl "bool" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number nonempty-type-decl nil numbers nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (boolean nonempty-type-decl nil booleans nil))
   nil))
 (sp_nzv 0
  (sp_nzv-1 nil 3466172996 ("" (judgement-tcc) nil nil)
   ((boolean nonempty-type-decl nil booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (OR const-decl "[bool, bool -> bool]" booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (>= const-decl "bool" reals nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (AND const-decl "[bool, bool -> bool]" booleans nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (abs const-decl "{n: nonneg_real | n >= m AND n >= -m}" real_defs
         nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (> const-decl "bool" reals nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (H formal-const-decl "posreal" space_3D nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (nnreal type-eq-decl nil real_types nil)
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (D formal-const-decl "posreal" space_3D nil)
    (Sp_vect3 type-eq-decl nil space_3D nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (int_abs_is_nonneg application-judgement "{j: nonneg_int | j >= i}"
     real_defs nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (* const-decl "real" vectors_2D "vectors/")
    (posreal_times_posreal_is_posreal application-judgement "posreal"
     real_types nil)
    (zero const-decl "Vector" vectors_3D "vectors/"))
   nil))
 (verticalCoordinationConflict_TCC1 0
  (verticalCoordinationConflict_TCC1-1 nil 3470498979
   ("" (subtype-tcc) nil nil)
   ((boolean nonempty-type-decl nil booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (>= const-decl "bool" reals nil)
    (nnreal type-eq-decl nil real_types nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (real_minus_real_is_real application-judgement "real" reals nil)
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (zero const-decl "Vector" vectors_3D "vectors/")
    (real_times_real_is_real application-judgement "real" reals nil)
    (posreal_times_posreal_is_posreal application-judgement "posreal"
     real_types nil)
    (real_plus_real_is_real application-judgement "real" reals nil))
   nil))
 (verticalCoordinationConflict_asymm 0
  (verticalCoordinationConflict_asymm-2 "" 3504835285
   ("" (skeep)
    (("" (expand "verticalCoordinationConflict")
      (("" (rewrite "vz_neg")
        (("" (rewrite "vect2_neg")
          (("" (rewrite "vect2_neg")
            (("" (rewrite "sqv_neg")
              (("" (rewrite "sqv_neg")
                (("" (rewrite "neg_dot_neg")
                  (("" (rewrite "vz_neg")
                    (("" (rewrite "sqv_eq_0" :dir rl)
                      (("" (rewrite "sqv_eq_0" :dir rl)
                        ((""
                          (case "v`z = 0 OR
                vect2(v) = zero OR
                 sq(vect2(s) * vect2(v)) + sq(D) * sqv(vect2(v)) -
                  sqv(vect2(s)) * sqv(vect2(v))
                  < 0
                  OR
                  eq(v`z,
                     sq(vect2(s) * vect2(v)) + sq(D) * sqv(vect2(v)) -
                      sqv(vect2(s)) * sqv(vect2(v)),
                     s`z * sqv(vect2(v)) - v`z * (vect2(s) * vect2(v)))")
                          (("1" (assert)
                            (("1" (replace -1)
                              (("1"
                                (case "sqv(s) = 0")
                                (("1"
                                  (assert)
                                  (("1"
                                    (hide -2)
                                    (("1"
                                      (lemma "break_symmetry_neg")
                                      (("1"
                                        (inst - "v")
                                        (("1"
                                          (lemma "vectors_3D.sqv_eq_0")
                                          (("1"
                                            (inst - "s")
                                            (("1" (assertnil nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil)
                                 ("2"
                                  (replace 1)
                                  (("2"
                                    (lift-if)
                                    (("2"
                                      (case "s /= zero")
                                      (("1"
                                        (flatten)
                                        (("1"
                                          (split +)
                                          (("1"
                                            (flatten)
                                            (("1"
                                              (lemma
                                               "break_symmetry_neg")
                                              (("1"
                                                (inst - "s")
                                                (("1"
                                                  (assert)
                                                  nil
                                                  nil))
                                                nil))
                                              nil))
                                            nil)
                                           ("2"
                                            (flatten)
                                            (("2"
                                              (split -)
                                              (("1" (assertnil nil)
                                               ("2"
                                                (replace -1)
                                                (("2"
                                                  (assert)
                                                  nil
                                                  nil))
                                                nil)
                                               ("3" (propax) nil nil)
                                               ("4"
                                                (lemma "eq_neg")
                                                (("4"
                                                  (inst?)
                                                  (("1"
                                                    (assert)
                                                    nil
                                                    nil)
                                                   ("2"
                                                    (assert)
                                                    nil
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil)
                                       ("2"
                                        (flatten)
                                        (("2"
                                          (replace -1)
                                          (("2" (assertnil nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil))
                                nil))
                              nil))
                            nil)
                           ("2" (flatten)
                            (("2" (assert)
                              (("2"
                                (case
                                 "gt(v`z,
                  sq(vect2(s) * vect2(v)) + sq(D) * sqv(vect2(v)) -
                   sqv(vect2(s)) * sqv(vect2(v)),
                  s`z * sqv(vect2(v)) - v`z * (vect2(s) * vect2(v)))")
                                (("1"
                                  (replace -1)
                                  (("1"
                                    (lift-if)
                                    (("1"
                                      (split +)
                                      (("1"
                                        (flatten)
                                        (("1"
                                          (case "s /= zero")
                                          (("1"
                                            (flatten)
                                            (("1"
                                              (lemma
                                               "vectors_3D.sqv_eq_0")
                                              (("1"
                                                (inst - "s")
                                                (("1"
                                                  (assert)
                                                  nil
                                                  nil))
                                                nil))
                                              nil))
                                            nil)
                                           ("2"
                                            (flatten)
                                            (("2"
                                              (replace -1)
                                              (("2"
                                                (assert)
                                                (("2"
                                                  (lemma
                                                   "break_symmetry_neg")
                                                  (("2"
                                                    (inst - "v")
                                                    nil
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil)
                                       ("2"
                                        (flatten)
                                        (("2"
                                          (split +)
                                          (("1"
                                            (flatten)
                                            (("1"
                                              (split -)
                                              (("1"
                                                (hide-all-but (-1 4))
                                                (("1"
                                                  (expand "zero")
                                                  (("1"
                                                    (grind)
                                                    nil
                                                    nil))
                                                  nil))
                                                nil)
                                               ("2"
                                                (lemma "eq_neg")
                                                (("2"
                                                  (inst?)
                                                  (("2"
                                                    (assert)
                                                    nil
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil)
                                           ("2"
                                            (flatten)
                                            (("2"
                                              (rewrite "eq_correct_1")
                                              (("2"
                                                (rewrite
                                                 "eq_correct_1")
                                                (("2"
                                                  (rewrite
                                                   "gt_correct_1")
                                                  (("2"
                                                    (rewrite
                                                     "gt_correct_1")
                                                    (("2"
                                                      (assert)
                                                      nil
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil)
                                 ("2"
                                  (replace 1)
                                  (("2"
                                    (case "s = zero")
                                    (("1"
                                      (replace -1)
                                      (("1"
                                        (assert)
                                        (("1"
                                          (lemma "break_symmetry_neg")
                                          (("1" (inst - "v"nil nil))
                                          nil))
                                        nil))
                                      nil)
                                     ("2"
                                      (hide -1)
                                      (("2"
                                        (lemma "vectors_3D.sqv_eq_0")
                                        (("2"
                                          (inst - "s")
                                          (("2"
                                            (assert)
                                            (("2"
                                              (lift-if)
                                              (("2"
                                                (assert)
                                                (("2"
                                                  (split +)
                                                  (("1"
                                                    (flatten)
                                                    (("1"
                                                      (split -)
                                                      (("1"
                                                        (hide-all-but
                                                         (-1 6))
                                                        (("1"
                                                          (expand
                                                           "zero")
                                                          (("1"
                                                            (grind)
                                                            nil
                                                            nil))
                                                          nil))
                                                        nil)
                                                       ("2"
                                                        (lemma
                                                         "eq_neg")
                                                        (("2"
                                                          (inst?)
                                                          (("2"
                                                            (assert)
                                                            nil
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil)
                                                   ("2"
                                                    (flatten)
                                                    (("2"
                                                      (split +)
                                                      (("1"
                                                        (propax)
                                                        nil
                                                        nil)
                                                       ("2"
                                                        (rewrite
                                                         "eq_correct_1")
                                                        (("2"
                                                          (rewrite
                                                           "gt_correct_1")
                                                          (("2"
                                                            (rewrite
                                                             "eq_correct_1")
                                                            (("2"
                                                              (rewrite
                                                               "gt_correct_1")
                                                              (("2"
                                                                (assert)
                                                                nil
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil))
                                nil))
                              nil))
                            nil)
                           ("3" (assert)
                            (("3" (flatten)
                              (("3"
                                (lift-if)
                                (("3"
                                  (lift-if)
                                  (("3" (assertnil nil))
                                  nil))
                                nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((sq_nz_pos application-judgement "posreal" sq "reals/")
    (nnreal_times_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (nnreal_plus_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (real_times_real_is_real application-judgement "real" reals nil)
    (verticalCoordinationConflict const-decl "Sign" space_3D nil)
    (vect2_neg formula-decl nil vect_3D_2D "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (sqv_neg formula-decl nil vectors_2D "vectors/")
    (neg_dot_neg formula-decl nil vectors_2D "vectors/")
    (- const-decl "Vector" vectors_3D "vectors/")
    (sqv_eq_0 formula-decl nil vectors_3D "vectors/")
    (sqv_neg formula-decl nil vectors_3D "vectors/")
    (eq const-decl "bool" util nil)
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (nnreal type-eq-decl nil real_types nil)
    (D formal-const-decl "posreal" space_3D nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (> const-decl "bool" reals nil)
    (* const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (* const-decl "real" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (>= const-decl "bool" reals nil)
    (+ const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (- const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (< const-decl "bool" reals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (zero const-decl "Vector" vectors_2D "vectors/")
    (= const-decl "[T, T -> boolean]" equalities nil)
    (number nonempty-type-decl nil numbers nil)
    (OR const-decl "[bool, bool -> bool]" booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (boolean nonempty-type-decl nil booleans nil)
    (real_minus_real_is_real application-judgement "real" reals nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (AND const-decl "[bool, bool -> bool]" booleans nil)
    (IMPLIES const-decl "[bool, bool -> bool]" booleans nil)
    (s skolem-const-decl "Vect3" space_3D nil)
    (neg_zero formula-decl nil vectors_2D "vectors/")
    (eq_neg formula-decl nil util nil)
    (sqv_zero formula-decl nil vectors_3D "vectors/")
    (break_symmetry_neg formula-decl nil definitions_3D nil)
    (v skolem-const-decl "Vect3" space_3D nil)
    (/= const-decl "boolean" notequal nil)
    (zero const-decl "Vector" vectors_3D "vectors/")
    (Nz_vect3 type-eq-decl nil vectors_3D "vectors/")
    (sqv const-decl "nnreal" vectors_3D "vectors/")
    (sign_neg_clos application-judgement "Sign" sign "reals/")
    (comp_zero_z formula-decl nil vectors_3D "vectors/")
    (sqv_zero formula-decl nil vectors_2D "vectors/")
    (sq_0 formula-decl nil sq "reals/")
    (dot_zero_left formula-decl nil vectors_2D "vectors/")
    (vect2_zero formula-decl nil vect_3D_2D "vectors/")
    (- const-decl "Vector" vectors_2D "vectors/")
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (eq_correct_1 formula-decl nil util nil)
    (gt_correct_1 formula-decl nil util nil)
    (real_gt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (gt const-decl "bool" util nil)
    (minus_real_is_real application-judgement "real" reals nil)
    (minus_odd_is_odd application-judgement "odd_int" integers nil)
    (vz_neg formula-decl nil vectors_3D "vectors/")
    (real nonempty-type-from-decl nil reals nil)
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/"))
   shostak)
  (verticalCoordinationConflict_asymm-1 nil 3470395632
   ("" (skeep)
    (("" (expand "verticalCoordinationConflict")
      (("" (rewrite "vz_neg")
        (("" (rewrite "vect2_neg")
          (("" (rewrite "vect2_neg")
            (("" (rewrite "sqv_neg")
              (("" (rewrite "sqv_neg")
                (("" (rewrite "neg_dot_neg")
                  (("" (rewrite "vz_neg")
                    (("" (rewrite "sqv_eq_0" :dir rl)
                      (("" (rewrite "sqv_eq_0" :dir rl)
                        (("" (lift-if)
                          (("" (lift-if)
                            (("" (assert)
                              ((""
                                (split +)
                                (("1"
                                  (flatten)
                                  (("1"
                                    (split +)
                                    (("1"
                                      (hide -1)
                                      (("1"
                                        (lemma "break_symmetry_neg")
                                        (("1"
                                          (inst - "v")
                                          (("1" (assertnil nil)
                                           ("2"
                                            (lemma
                                             "vectors_3D.sqv_eq_0")
                                            (("2"
                                              (inst - "s")
                                              (("2"
                                                (assert)
                                                (("2"
                                                  (ground)
                                                  nil
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil)
                                     ("2"
                                      (flatten)
                                      (("2"
                                        (case "s /= zero")
                                        (("1"
                                          (flatten)
                                          (("1"
                                            (split +)
                                            (("1"
                                              (flatten)
                                              (("1"
                                                (lemma
                                                 "break_symmetry_neg")
                                                (("1"
                                                  (inst - "s")
                                                  (("1"
                                                    (assert)
                                                    nil
                                                    nil))
                                                  nil))
                                                nil))
                                              nil)
                                             ("2"
                                              (flatten)
                                              (("2"
                                                (split -)
                                                (("1" (assertnil nil)
                                                 ("2"
                                                  (replace -1)
                                                  (("2"
                                                    (assert)
                                                    nil
                                                    nil))
                                                  nil)
                                                 ("3" (propax) nil nil)
                                                 ("4"
                                                  (lemma "eq_neg")
                                                  (("4"
                                                    (inst?)
                                                    (("1"
                                                      (assert)
                                                      nil
                                                      nil)
                                                     ("2"
                                                      (assert)
                                                      nil
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil)
                                         ("2"
                                          (flatten)
                                          (("2"
                                            (replace -1)
                                            (("2" (assertnil nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil)
                                 ("2"
                                  (flatten)
                                  (("2"
                                    (split +)
                                    (("1"
                                      (flatten)
                                      (("1"
                                        (split +)
                                        (("1"
                                          (flatten)
                                          (("1"
                                            (case "s /= zero")
                                            (("1"
                                              (flatten)
                                              (("1"
                                                (lemma
                                                 "vectors_3D.sqv_eq_0")
                                                (("1"
                                                  (inst - "s")
                                                  (("1"
                                                    (assert)
                                                    nil
                                                    nil))
                                                  nil))
                                                nil))
                                              nil)
                                             ("2"
                                              (flatten)
                                              (("2"
                                                (replace -1)
                                                (("2"
                                                  (assert)
                                                  (("2"
                                                    (lemma
                                                     "break_symmetry_neg")
                                                    (("2"
                                                      (inst - "v")
                                                      nil
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil)
                                         ("2"
                                          (flatten)
                                          (("2"
                                            (split +)
                                            (("1"
                                              (flatten)
                                              (("1"
                                                (split -)
                                                (("1"
                                                  (hide-all-but (-1 4))
                                                  (("1"
                                                    (expand "zero")
                                                    (("1"
                                                      (grind)
                                                      nil
                                                      nil))
                                                    nil))
                                                  nil)
                                                 ("2"
                                                  (lemma "eq_neg")
                                                  (("2"
                                                    (inst?)
                                                    (("1"
                                                      (assert)
                                                      nil
                                                      nil)
                                                     ("2"
                                                      (assert)
                                                      nil
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil)
                                             ("2"
                                              (flatten)
                                              (("2"
                                                (rewrite
                                                 "eq_correct_1")
                                                (("2"
                                                  (rewrite
                                                   "eq_correct_1")
                                                  (("2"
                                                    (rewrite
                                                     "gt_correct_1")
                                                    (("2"
                                                      (rewrite
                                                       "gt_correct_1")
                                                      (("2"
                                                        (split +)
                                                        (("1"
                                                          (assert)
                                                          nil
                                                          nil)
                                                         ("2"
                                                          (propax)
                                                          nil
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil)
                                     ("2"
                                      (flatten)
                                      (("2"
                                        (case "s = zero")
                                        (("1"
                                          (replace -1)
                                          (("1"
                                            (assert)
                                            (("1"
                                              (lemma
                                               "break_symmetry_neg")
                                              (("1"
                                                (inst - "v")
                                                nil
                                                nil))
                                              nil))
                                            nil))
                                          nil)
                                         ("2"
                                          (hide -1)
                                          (("2"
                                            (lemma
                                             "vectors_3D.sqv_eq_0")
                                            (("2"
                                              (inst - "s")
                                              (("2"
                                                (assert)
                                                (("2"
                                                  (split +)
                                                  (("1"
                                                    (flatten)
                                                    (("1"
                                                      (split -)
                                                      (("1"
                                                        (hide-all-but
                                                         (-1 6))
                                                        (("1"
                                                          (expand
                                                           "zero")
                                                          (("1"
                                                            (grind)
                                                            nil
                                                            nil))
                                                          nil))
                                                        nil)
                                                       ("2"
                                                        (lemma
                                                         "eq_neg")
                                                        (("2"
                                                          (inst?)
                                                          (("2"
                                                            (assert)
                                                            nil
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil)
                                                   ("2"
                                                    (flatten)
                                                    (("2"
                                                      (split +)
                                                      (("1"
                                                        (propax)
                                                        nil
                                                        nil)
                                                       ("2"
                                                        (rewrite
                                                         "eq_correct_1")
                                                        (("2"
                                                          (rewrite
                                                           "gt_correct_1")
                                                          (("2"
                                                            (rewrite
                                                             "eq_correct_1")
                                                            (("2"
                                                              (rewrite
                                                               "gt_correct_1")
                                                              (("2"
                                                                (assert)
                                                                nil
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil))
                                nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((sq_nz_pos application-judgement "posreal" sq "reals/")
    (vect2_neg formula-decl nil vect_3D_2D "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (sqv_neg formula-decl nil vectors_2D "vectors/")
    (neg_dot_neg formula-decl nil vectors_2D "vectors/")
    (sqv_eq_0 formula-decl nil vectors_3D "vectors/")
    (sqv_neg formula-decl nil vectors_3D "vectors/")
    (eq const-decl "bool" util nil)
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (zero const-decl "Vector" vectors_2D "vectors/")
    (neg_zero formula-decl nil vectors_2D "vectors/")
    (eq_neg formula-decl nil util nil)
    (sqv_zero formula-decl nil vectors_3D "vectors/")
    (break_symmetry_neg formula-decl nil definitions_3D nil)
    (Nz_vect3 type-eq-decl nil vectors_3D "vectors/")
    (zero const-decl "Vector" vectors_3D "vectors/")
    (sqv const-decl "nnreal" vectors_3D "vectors/")
    (sign_neg_clos application-judgement "Sign" sign "reals/")
    (comp_zero_z formula-decl nil vectors_3D "vectors/")
    (sqv_zero formula-decl nil vectors_2D "vectors/")
    (sq_0 formula-decl nil sq "reals/")
    (dot_zero_left formula-decl nil vectors_2D "vectors/")
    (vect2_zero formula-decl nil vect_3D_2D "vectors/")
    (eq_correct_1 formula-decl nil util nil)
    (gt_correct_1 formula-decl nil util nil)
    (vz_neg formula-decl nil vectors_3D "vectors/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/"))
   nil))
 (Vertical_Strategy_TCC1 0
  (Vertical_Strategy_TCC1-1 nil 3470395677
   ("" (inst 1 "verticalCoordinationConflict")
    (("" (skeep)
      (("" (rewrite "verticalCoordinationConflict_asymm"nil nil))
      nil))
    nil)
   ((verticalCoordinationConflict_asymm formula-decl nil space_3D nil)
    (verticalCoordinationConflict const-decl "Sign" space_3D nil)
    (- const-decl "Vector" vectors_3D "vectors/")
    (zero const-decl "Vector" vectors_3D "vectors/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (IMPLIES const-decl "[bool, bool -> bool]" booleans nil)
    (Sign type-eq-decl nil sign "reals/")
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (= const-decl "[T, T -> boolean]" equalities nil)
    (OR const-decl "[bool, bool -> bool]" booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (nzint nonempty-type-eq-decl nil integers nil)
    (/= const-decl "boolean" notequal nil)
    (int nonempty-type-eq-decl nil integers nil)
    (integer_pred const-decl "[rational -> boolean]" integers nil)
    (rational nonempty-type-from-decl nil rationals nil)
    (rational_pred const-decl "[real -> boolean]" rationals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (boolean nonempty-type-decl nil booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (real nonempty-type-from-decl nil reals nil))
   nil))
 (verticalCoordinationConflict_strategy 0
  (verticalCoordinationConflict_strategy-2 nil 3550260298
   ("" (skeep)
    (("" (rewrite "verticalCoordinationConflict_asymm"nil nil)) nil)
   ((verticalCoordinationConflict_asymm formula-decl nil space_3D nil)
    (real nonempty-type-from-decl nil reals nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/"))
   nil)
  (verticalCoordinationConflict_strategy-1 nil 3550260273
   ("" (judgement-tcc) nil nilnil nil))
 (verticalCoordinationConflict_correct_TCC1 0
  (verticalCoordinationConflict_correct_TCC1-1 nil 3470415887
   ("" (skosimp*)
    (("" (lemma "Delta_gt_0_nzv")
      (("" (inst?) (("" (assertnil nil)) nil)) nil))
    nil)
   ((D formal-const-decl "posreal" space_3D nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (> const-decl "bool" reals nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (>= const-decl "bool" reals nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (real nonempty-type-from-decl nil reals nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (boolean nonempty-type-decl nil booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (Delta_gt_0_nzv formula-decl nil horizontal nil)
    (real_gt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (/= const-decl "boolean" notequal nil)
    (zero const-decl "Vector" vectors_3D "vectors/")
    (Nz_vect3 type-eq-decl nil vectors_3D "vectors/"))
   nil))
 (verticalCoordinationConflict_correct 0
  (verticalCoordinationConflict_correct-2 nil 3478621317
   ("" (skeep)
    (("" (skoletin 1)
      (("" (flatten)
        (("" (lemma "Delta_gt_0_nzv")
          (("" (inst?)
            (("" (assert)
              (("" (flatten)
                (("" (expand "verticalCoordinationConflict")
                  (("" (case-replace "v`z = 0")
                    (("1" (assert)
                      (("1" (replaces -2)
                        (("1" (hide-all-but (2 3))
                          (("1" (grind) nil nil)) nil))
                        nil))
                      nil)
                     ("2" (assert)
                      (("2" (lemma "Delta_discr2b")
                        (("2" (inst?)
                          (("2" (rewrite "sqv_eq_0" :dir rl)
                            (("2" (skoletin* -1)
                              (("2"
                                (replace -4 :dir rl)
                                (("2"
                                  (replace -3 :dir rl)
                                  (("2"
                                    (name-replace
                                     "dd"
                                     "sq(b) + sq(D) * a - sqv(vect2(nzs)) * a"
                                     :hide?
                                     nil)
                                    (("2"
                                      (case-replace
                                       "discr2b(a,b,c)=dd")
                                      (("1"
                                        (case "dd > 0")
                                        (("1"
                                          (assert)
                                          (("1"
                                            (rewrite "eq_correct_1")
                                            (("1"
                                              (rewrite "gt_correct_1")
                                              (("1"
                                                (lift-if)
                                                (("1"
                                                  (expand "Theta_D")
                                                  (("1"
                                                    (replace
                                                     -7
                                                     :dir
                                                     rl)
                                                    (("1"
                                                      (replace
                                                       -6
                                                       :dir
                                                       rl)
                                                      (("1"
                                                        (replace
                                                         -4
                                                         :dir
                                                         rl)
                                                        (("1"
                                                          (expand
                                                           "root2b")
                                                          (("1"
                                                            (assert)
                                                            (("1"
                                                              (case
                                                               "nzs`z + (-b - sqrt(dd)) / a * v`z > 0")
                                                              (("1"
                                                                (expand
                                                                 "sign")
                                                                (("1"
                                                                  (assert)
                                                                  (("1"
                                                                    (split
                                                                     4)
                                                                    (("1"
                                                                      (isolate
                                                                       -2
                                                                       l
                                                                       2)
                                                                      (("1"
                                                                        (cross-mult
                                                                         -2)
                                                                        (("1"
                                                                          (assert)
                                                                          nil
                                                                          nil))
                                                                        nil))
                                                                      nil)
                                                                     ("2"
                                                                      (propax)
                                                                      nil
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil)
                                                               ("2"
                                                                (expand
                                                                 "sign")
                                                                (("2"
                                                                  (assert)
                                                                  (("2"
                                                                    (split
                                                                     5)
                                                                    (("1"
                                                                      (propax)
                                                                      nil
                                                                      nil)
                                                                     ("2"
                                                                      (isolate
                                                                       2
                                                                       l
                                                                       2)
                                                                      (("2"
                                                                        (cross-mult
                                                                         2)
                                                                        (("2"
                                                                          (assert)
                                                                          nil
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil)
                                         ("2" (assertnil nil))
                                        nil)
                                       ("2"
                                        (hide 5)
                                        (("2"
                                          (expand "discr2b")
                                          (("2"
                                            (assert)
                                            (("2" (assertnil nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil))
                                nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((zero const-decl "Vector" vectors_2D "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (/= const-decl "boolean" notequal nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (real nonempty-type-from-decl nil reals nil)
    (NOT const-decl "[bool -> bool]" booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (boolean nonempty-type-decl nil booleans nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (minus_odd_is_odd application-judgement "odd_int" integers nil)
    (TRUE const-decl "bool" booleans nil)
    (id const-decl "(bijective?[T, T])" identity nil)
    (bijective? const-decl "bool" functions nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (>= const-decl "bool" reals nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (> const-decl "bool" reals nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (D formal-const-decl "posreal" space_3D nil)
    (Delta const-decl "real" horizontal nil)
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (zero const-decl "Vector" vectors_3D "vectors/")
    (Nz_vect3 type-eq-decl nil vectors_3D "vectors/")
    (IFF const-decl "[bool, bool -> bool]" booleans nil)
    (real_times_real_is_real application-judgement "real" reals nil)
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (= const-decl "[T, T -> boolean]" equalities nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (+ const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (* const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (Nz_vect2 type-eq-decl nil vectors_2D "vectors/")
    (rational_pred const-decl "[real -> boolean]" rationals nil)
    (rational nonempty-type-from-decl nil rationals nil)
    (integer_pred const-decl "[rational -> boolean]" integers nil)
    (int nonempty-type-eq-decl nil integers nil)
    (nzint nonempty-type-eq-decl nil integers nil)
    (OR const-decl "[bool, bool -> bool]" booleans nil)
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (Sign type-eq-decl nil sign "reals/")
    (Theta_D const-decl "real" horizontal nil)
    (IMPLIES const-decl "[bool, bool -> bool]" booleans nil)
    (verticalCoordinationConflict const-decl "Sign" space_3D nil)
    (sign const-decl "Sign" sign "reals/")
    (Delta_gt_0_nzv formula-decl nil horizontal nil)
    (real_gt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (verticalCoordinationConflict_strategy name-judgement
     "Vertical_Strategy" space_3D nil)
    (sq_nz_pos application-judgement "posreal" sq "reals/")
    (nnreal_times_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (nnreal_plus_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (real_minus_real_is_real application-judgement "real" reals nil)
    (real_lt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (nnreal type-eq-decl nil real_types nil)
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (- const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (* const-decl "real" vectors_2D "vectors/")
    (nzreal nonempty-type-eq-decl nil reals nil)
    (discr2b const-decl "real" quadratic_2b "reals/")
    (gt_correct_1 formula-decl nil util nil)
    (minus_real_is_real application-judgement "real" reals nil)
    (real_div_nzreal_is_real application-judgement "real" reals nil)
    (root2b const-decl "real" quadratic_2b "reals/")
    (nznum nonempty-type-eq-decl nil number_fields nil)
    (/ const-decl "[numfield, nznum -> numfield]" number_fields nil)
    (sqrt const-decl "{nnz: nnreal | nnz * nnz = nnx}" sqrt "reals/")
    (div_mult_pos_gt1 formula-decl nil extra_real_props nil)
    (nonzero_real nonempty-type-eq-decl nil reals nil)
    (times_div2 formula-decl nil real_props nil)
    (eq_correct_1 formula-decl nil util nil)
    (sqv_eq_0 formula-decl nil vectors_2D "vectors/")
    (Delta_discr2b formula-decl nil horizontal nil)
    (break_symmetry const-decl "Sign" definitions_3D nil))
   nil)
  (verticalCoordinationConflict_correct-1 nil 3470416043
   ("" (skeep)
    (("" (skoletin 1)
      (("" (flatten)
        (("" (lemma "Delta_gt_0_nzv")
          (("" (inst?)
            (("" (assert)
              (("" (flatten)
                (("" (expand "verticalCoordinationConflict")
                  (("" (case-replace "v`z = 0")
                    (("1" (assert)
                      (("1" (replaces -2)
                        (("1" (hide-all-but (2 3))
                          (("1" (grind) nil nil)) nil))
                        nil))
                      nil)
                     ("2" (assert)
                      (("2" (lemma "Delta_discr2b")
                        (("2" (inst?)
                          (("2" (rewrite "sqv_eq_0" :dir rl)
                            (("2" (skoletin* -1)
                              (("1"
                                (replace -4 :dir rl)
                                (("1"
                                  (replace -3 :dir rl)
                                  (("1"
                                    (name-replace
                                     "dd"
                                     "sq(b) + sq(D) * a - sqv(vect2(nzs)) * a"
                                     :hide?
                                     nil)
                                    (("1"
                                      (case-replace
                                       "discr2b(a,b,c)=dd")
                                      (("1"
                                        (case "dd > 0")
                                        (("1"
                                          (assert)
                                          (("1"
                                            (rewrite "eq_correct_1")
                                            (("1"
                                              (rewrite "gt_correct_1")
                                              (("1"
                                                (lift-if)
                                                (("1"
                                                  (expand "Theta_D")
                                                  (("1"
                                                    (replace
                                                     -7
                                                     :dir
                                                     rl)
                                                    (("1"
                                                      (replace
                                                       -6
                                                       :dir
                                                       rl)
                                                      (("1"
                                                        (replace
                                                         -4
                                                         :dir
                                                         rl)
                                                        (("1"
                                                          (expand
                                                           "root2b")
                                                          (("1"
                                                            (replace
                                                             -2)
                                                            (("1"
                                                              (assert)
                                                              (("1"
                                                                (case
                                                                 "nzs`z + (-b - sqrt(dd)) / a * v`z > 0")
                                                                (("1"
                                                                  (expand
                                                                   "sign")
                                                                  (("1"
                                                                    (assert)
                                                                    (("1"
                                                                      (split
                                                                       4)
                                                                      (("1"
                                                                        (isolate
                                                                         -2
                                                                         l
                                                                         2)
                                                                        (("1"
                                                                          (cross-mult
                                                                           -2)
                                                                          (("1"
                                                                            (assert)
                                                                            nil
                                                                            nil))
                                                                          nil))
                                                                        nil)
                                                                       ("2"
                                                                        (propax)
                                                                        nil
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil)
                                                                 ("2"
                                                                  (expand
                                                                   "sign")
                                                                  (("2"
                                                                    (assert)
                                                                    (("2"
                                                                      (split
                                                                       5)
                                                                      (("1"
                                                                        (propax)
                                                                        nil
                                                                        nil)
                                                                       ("2"
                                                                        (isolate
                                                                         2
                                                                         l
                                                                         2)
                                                                        (("2"
                                                                          (cross-mult
                                                                           2)
                                                                          (("2"
                                                                            (assert)
                                                                            nil
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil)
                                         ("2" (assertnil nil))
                                        nil)
                                       ("2"
                                        (hide 5)
                                        (("2"
                                          (expand "discr2b")
                                          (("2" (assertnil nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil))
                                nil)
                               ("2" (assertnil nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((break_symmetry const-decl "Sign" definitions_3D nil)
    (Delta_discr2b formula-decl nil horizontal nil)
    (sqv_eq_0 formula-decl nil vectors_2D "vectors/")
    (eq_correct_1 formula-decl nil util nil)
    (sqrt const-decl "{nnz: nnreal | nnz * nnz = nnx}" sqrt "reals/")
    (root2b const-decl "real" quadratic_2b "reals/")
    (gt_correct_1 formula-decl nil util nil)
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (sq const-decl "nonneg_real" sq "reals/")
    (discr2b const-decl "real" quadratic_2b "reals/")
    (sq_nz_pos application-judgement "posreal" sq "reals/")
    (Delta_gt_0_nzv formula-decl nil horizontal nil)
    (sign const-decl "Sign" sign "reals/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (zero const-decl "Vector" vectors_3D "vectors/")
    (Nz_vect3 type-eq-decl nil vectors_3D "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (zero const-decl "Vector" vectors_2D "vectors/")
    (Nz_vect2 type-eq-decl nil vectors_2D "vectors/")
    (Delta const-decl "real" horizontal nil)
    (Sign type-eq-decl nil sign "reals/")
    (Theta_D const-decl "real" horizontal nil)
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/"))
   shostak))
 (vs_los_strategy_TCC1 0
  (vs_los_strategy_TCC1-1 nil 3478949740 ("" (subtype-tcc) nil nil)
   ((vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (real_times_real_is_real application-judgement "real" reals nil))
   nil))
 (vs_los_vertical_strategy 0
  (vs_los_vertical_strategy-2 nil 3478949740
   ("" (skeep)
    (("" (expand "vs_los_strategy" 1 1)
      (("" (label "svnz" -1)
        (("" (lift-if)
          (("" (split +)
            (("1" (flatten)
              (("1"
                (case "1*(vect2(s)*vect2(v)) >= 0 OR vect2(v) = zero")
                (("1" (label "entryorzero" -1)
                  (("1" (split +)
                    (("1" (flatten)
                      (("1" (rewrite "vz_neg")
                        (("1" (expand "vs_los_strategy")
                          (("1" (assert)
                            (("1" (replace -1)
                              (("1"
                                (hide -)
                                (("1" (grind) nil nil))
                                nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil)
                     ("2" (flatten)
                      (("2" (case "s`z = 0")
                        (("1" (label "szzero" -1)
                          (("1" (split +)
                            (("1" (flatten)
                              (("1"
                                (rewrite "vz_neg")
                                (("1"
                                  (expand "vs_los_strategy")
                                  (("1"
                                    (replace -3)
                                    (("1"
                                      (lift-if)
                                      (("1"
                                        (assert)
                                        (("1"
                                          (hide -)
                                          (("1" (grind) nil nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil))
                                nil))
                              nil)
                             ("2" (flatten)
                              (("2"
                                (case "v`z = 0")
                                (("1"
                                  (split +)
                                  (("1"
                                    (flatten)
                                    (("1"
                                      (expand "vs_los_strategy")
                                      (("1"
                                        (lift-if)
                                        (("1"
                                          (assert)
                                          (("1"
                                            (replace "entryorzero")
                                            (("1"
                                              (case "s /= zero")
                                              (("1"
                                                (assert)
                                                (("1"
                                                  (lemma
                                                   "break_symmetry_neg")
                                                  (("1"
                                                    (inst - "s")
                                                    nil
                                                    nil))
                                                  nil))
                                                nil)
                                               ("2"
                                                (flatten)
                                                (("2"
                                                  (hide-all-but (-1 1))
                                                  (("2"
                                                    (expand "zero")
                                                    (("2"
                                                      (grind)
                                                      nil
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil)
                                   ("2"
                                    (flatten)
                                    (("2"
                                      (case "s = zero")
                                      (("1"
                                        (assert)
                                        (("1"
                                          (case "-v /= zero")
                                          (("1"
                                            (assert)
                                            (("1"
                                              (expand
                                               "vs_los_strategy")
                                              (("1"
                                                (lift-if)
                                                (("1"
                                                  (replace
                                                   "entryorzero")
                                                  (("1"
                                                    (lemma
                                                     "break_symmetry_neg")
                                                    (("1"
                                                      (inst - "v")
                                                      nil
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil)
                                           ("2"
                                            (hide-all-but
                                             ("svnz" 1 -3))
                                            (("2"
                                              (flatten)
                                              (("2"
                                                (expand "zero")
                                                (("2"
                                                  (decompose-equality
                                                   +)
                                                  (("1"
                                                    (grind)
                                                    nil
                                                    nil)
                                                   ("2"
                                                    (grind)
                                                    nil
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil)
                                       ("2"
                                        (hide-all-but (-1 1))
                                        (("2"
                                          (expand "zero")
                                          (("2"
                                            (decompose-equality +)
                                            (("1" (grind) nil nil)
                                             ("2" (grind) nil nil)
                                             ("3" (grind) nil nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil)
                                 ("2"
                                  (rewrite "vz_neg")
                                  (("2" (assertnil nil))
                                  nil))
                                nil))
                              nil))
                            nil))
                          nil)
                         ("2" (rewrite "vz_neg")
                          (("2" (assertnil nil)) nil))
                        nil))
                      nil))
                    nil))
                  nil)
                 ("2" (hide-all-but (-1 1))
                  (("2" (flatten)
                    (("2" (split -)
                      (("1" (grind) nil nil)
                       ("2" (expand "zero") (("2" (grind) nil nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil)
             ("2" (flatten)
              (("2"
                (case "NOT (1*(vect2(s)*vect2(v)) >= 0 OR vect2(v) = zero)")
                (("1" (flatten)
                  (("1"
                    (name "tca" "horizontal_tca(vect2(-s),vect2(-v))")
                    (("1" (label "tcaname" -1)
                      (("1" (case "tca > 0")
                        (("1" (case "tca = horizontal_tca(s,v)")
                          (("1" (label "tcaeq" -1)
                            (("1" (replace "tcaname")
                              (("1"
                                (case
                                 "(-s+tca*-v)`z = - (s + tca*v)`z")
                                (("1"
                                  (split +)
                                  (("1"
                                    (flatten)
                                    (("1"
                                      (replace -1)
                                      (("1"
                                        (expand "vs_los_strategy")
                                        (("1"
                                          (lift-if)
                                          (("1"
                                            (assert)
                                            (("1"
                                              (replace "tcaeq" :dir rl)
                                              (("1"
                                                (hide-all-but (1 2))
                                                (("1" (grind) nil nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil)
                                   ("2"
                                    (flatten)
                                    (("2"
                                      (split +)
                                      (("1"
                                        (flatten)
                                        (("1"
                                          (rewrite "vz_neg")
                                          (("1"
                                            (expand "vs_los_strategy")
                                            (("1"
                                              (lift-if)
                                              (("1"
                                                (assert)
                                                (("1"
                                                  (hide-all-but (1 2))
                                                  (("1"
                                                    (grind)
                                                    nil
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil)
                                       ("2"
                                        (flatten)
                                        (("2"
                                          (rewrite "vz_neg")
                                          (("2"
                                            (split +)
                                            (("1"
                                              (flatten)
                                              (("1"
                                                (expand
                                                 "vs_los_strategy")
                                                (("1"
                                                  (lift-if)
                                                  (("1"
                                                    (assert)
                                                    (("1"
                                                      (case
                                                       "s /= zero")
                                                      (("1"
                                                        (assert)
                                                        (("1"
                                                          (lemma
                                                           "break_symmetry_neg")
                                                          (("1"
                                                            (inst
                                                             -
                                                             "s")
                                                            nil
                                                            nil))
                                                          nil))
                                                        nil)
                                                       ("2"
                                                        (flatten)
                                                        (("2"
                                                          (hide-all-but
                                                           (-1 1))
                                                          (("2"
                                                            (expand
                                                             "zero")
                                                            (("2"
                                                              (grind)
                                                              nil
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil)
                                             ("2"
                                              (flatten)
                                              (("2"
                                                (split +)
                                                (("1"
                                                  (flatten)
                                                  (("1"
                                                    (case "v /= zero")
                                                    (("1"
                                                      (expand
                                                       "vs_los_strategy")
                                                      (("1"
                                                        (lift-if)
                                                        (("1"
                                                          (assert)
                                                          (("1"
                                                            (case
                                                             "s = zero")
                                                            (("1"
                                                              (assert)
                                                              (("1"
                                                                (lemma
                                                                 "break_symmetry_neg")
                                                                (("1"
                                                                  (inst
                                                                   -
                                                                   "v")
                                                                  nil
                                                                  nil))
                                                                nil))
                                                              nil)
                                                             ("2"
                                                              (hide-all-but
                                                               (-2 1))
                                                              (("2"
                                                                (expand
                                                                 "zero")
                                                                (("2"
                                                                  (grind)
                                                                  (("2"
                                                                    (decompose-equality
                                                                     +)
                                                                    nil
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil)
                                                     ("2"
                                                      (flatten)
                                                      (("2"
                                                        (hide-all-but
                                                         (-1 1))
                                                        (("2"
                                                          (expand
                                                           "zero")
                                                          (("2"
                                                            (grind)
                                                            nil
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil)
                                                 ("2"
                                                  (flatten)
                                                  (("2"
                                                    (case "v = zero")
                                                    (("1"
                                                      (assert)
                                                      (("1"
                                                        (hide-all-but
                                                         (-3 "svnz"))
                                                        (("1"
                                                          (flatten)
                                                          (("1"
                                                            (expand
                                                             "zero")
                                                            (("1"
                                                              (grind)
                                                              (("1"
                                                                (decompose-equality
                                                                 +)
                                                                nil
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil)
                                                     ("2"
                                                      (hide-all-but
                                                       (-1 1))
                                                      (("2"
                                                        (expand "zero")
                                                        (("2"
                                                          (grind)
                                                          (("2"
                                                            (decompose-equality
                                                             +)
                                                            nil
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil))
                                                  nil))
                                                nil))
                                              nil))
                                            nil))
                                          nil))
                                        nil))
                                      nil))
                                    nil))
                                  nil)
                                 ("2"
                                  (hide-all-but 1)
                                  (("2" (grind) nil nil))
                                  nil))
                                nil))
                              nil))
                            nil)
                           ("2" (replace "tcaname" :dir rl)
                            (("2" (expand "horizontal_tca")
                              (("2"
                                (cross-mult 1)
                                (("2"
                                  (hide-all-but 1)
                                  (("2" (grind) nil nil))
                                  nil))
                                nil))
                              nil))
                            nil)
                           ("3" (assertnil nil))
                          nil)
                         ("2" (replace "tcaname" :dir rl)
                          (("2" (expand "horizontal_tca")
                            (("2" (case "sqv(vect2(-v)) > 0")
                              (("1"
                                (cross-mult 1)
                                (("1" (assertnil nil))
                                nil)
                               ("2"
                                (lemma "vectors_2D.sqv_eq_0")
                                (("2"
                                  (inst - "-v")
                                  (("2" (assertnil nil))
                                  nil))
                                nil))
                              nil))
                            nil))
                          nil))
                        nil))
                      nil)
                     ("2" (assertnil nil))
                    nil))
                  nil)
                 ("2" (hide-all-but (-1 1 2))
                  (("2" (split -)
                    (("1" (grind) nil nil)
                     ("2" (hide 1)
                      (("2" (expand "zero") (("2" (grind) nil nil))
                        nil))
                      nil))
                    nil))
                  nil))
                nil))
              nil))
            nil))
          nil))
        nil))
      nil))
    nil)
   ((vs_los_strategy const-decl "Sign" space_3D nil)
    (minus_even_is_even application-judgement "even_int" integers nil)
    (nnreal_times_nnreal_is_nnreal application-judgement "nnreal"
     real_types nil)
    (v skolem-const-decl "Vect3" space_3D nil)
    (posreal nonempty-type-eq-decl nil real_types nil)
    (nonneg_real nonempty-type-eq-decl nil real_types nil)
    (div_mult_pos_gt1 formula-decl nil extra_real_props nil)
    (sqv_eq_0 formula-decl nil vectors_2D "vectors/")
    (real_gt_is_strict_total_order name-judgement
     "(strict_total_order?[real])" real_props nil)
    (- const-decl "[numfield -> numfield]" number_fields nil)
    (* const-decl "Vector" vectors_3D "vectors/")
    (+ const-decl "Vector" vectors_3D "vectors/")
    (div_cancel4 formula-decl nil real_props nil)
    (times_div2 formula-decl nil real_props nil)
    (/ const-decl "[numfield, nznum -> numfield]" number_fields nil)
    (nznum nonempty-type-eq-decl nil number_fields nil)
    (sqv const-decl "nnreal" vectors_2D "vectors/")
    (nnreal type-eq-decl nil real_types nil)
    (nonzero_real nonempty-type-eq-decl nil reals nil)
    (div_cancel3 formula-decl nil real_props nil)
    (real_div_nzreal_is_real application-judgement "real" reals nil)
    (> const-decl "bool" reals nil)
    (horizontal_tca const-decl "real" definitions nil)
    (Nz_vect2 type-eq-decl nil vectors_2D "vectors/")
    (NOT const-decl "[bool -> bool]" booleans nil)
    (real_plus_real_is_real application-judgement "real" reals nil)
    (/= const-decl "boolean" notequal nil)
    (zero const-decl "Vector" vectors_3D "vectors/")
    (break_symmetry_neg formula-decl nil definitions_3D nil)
    (Nz_vect3 type-eq-decl nil vectors_3D "vectors/")
    (- const-decl "Vector" vectors_3D "vectors/")
    (minus_odd_is_odd application-judgement "odd_int" integers nil)
    (sign const-decl "Sign" sign "reals/")
    (real_ge_is_total_order name-judgement "(total_order?[real])"
     real_props nil)
    (sign_neg_clos application-judgement "Sign" sign "reals/")
    (minus_real_is_real application-judgement "real" reals nil)
    (vz_neg formula-decl nil vectors_3D "vectors/")
    (Vector type-eq-decl nil vectors_3D "vectors/")
    (real_times_real_is_real application-judgement "real" reals nil)
    (boolean nonempty-type-decl nil booleans nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (OR const-decl "[bool, bool -> bool]" booleans nil)
    (number nonempty-type-decl nil numbers nil)
    (number_field_pred const-decl "[number -> boolean]" number_fields
     nil)
    (number_field nonempty-type-from-decl nil number_fields nil)
    (real_pred const-decl "[number_field -> boolean]" reals nil)
    (real nonempty-type-from-decl nil reals nil)
    (>= const-decl "bool" reals nil)
    (numfield nonempty-type-eq-decl nil number_fields nil)
    (* const-decl "[numfield, numfield -> numfield]" number_fields nil)
    (Vector type-eq-decl nil vectors_2D "vectors/")
    (* const-decl "real" vectors_2D "vectors/")
    (Vect3 type-eq-decl nil vectors_3D_def "vectors/")
    (Vect2 type-eq-decl nil vectors_2D_def "vectors/")
    (vect2 const-decl "Vect2" vect_3D_2D "vectors/")
    (= const-decl "[T, T -> boolean]" equalities nil)
    (zero const-decl "Vector" vectors_2D "vectors/"))
   nil)
  (vs_los_vertical_strategy-1 nil 3478949740
   ("" (judgement-tcc) nil nilnil nil)))


Messung V0.5 in Prozent
C=100 H=100 G=100

¤ Dauer der Verarbeitung: 0.170 Sekunden  (vorverarbeitet am  2026-04-28) ¤

*© Formatika GbR, Deutschland






Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung und die Messung sind noch experimentell.






                                                                                                                                                                                                                                                                                                                                                                                                     


Neuigkeiten

     Aktuelles
     Motto des Tages

Software

     Produkte
     Quellcodebibliothek

Aktivitäten

     Artikel über Sicherheit
     Anleitung zur Aktivierung von SSL

Muße

     Gedichte
     Musik
     Bilder

Jenseits des Üblichen ....

Besucherstatistik

Besucherstatistik

Monitoring

Montastic status badge