Some experiments on a co-inductive Heityng algebra.

[helm.git] / helm / software / matita / predefined_virtuals.ml

diff --git a/helm/software/matita/predefined_virtuals.ml b/helm/software/matita/predefined_virtuals.ml
index fb446d53785b264b5d584ae1307e833c779695b9..49d5f866dd93dbbad6749cf6c3cfaba1687a98bd 100644 (file)
--- a/helm/software/matita/predefined_virtuals.ml
+++ b/helm/software/matita/predefined_virtuals.ml
@@ -51,6 +51,7 @@ let predefined_virtuals = [
  ["\\sect"                                           ], "§", [symbol];
  ["\\uml"; "\\die"; "\\Dot"; "\\DoubleDot"              ], "¨", [symbol];
  ["\\macr"; "\\OverBar"                               ], "¯", [symbol];
+ ["\\sup"                                           ], "^", [symbol];
  ["\\sup2"                                           ], "²", [symbol];
  ["\\sup3"                                           ], "³", [symbol];
  ["\\acute"; "\\DiacriticalAcute"                     ], "´", [symbol];
@@ -150,7 +151,7 @@ let predefined_virtuals = [
  ["\\smile"                                          ], "⌣", [symbol];
  ["\\blank"                                          ], "␣", [symbol];
  ["\\HorizontalLine"                                 ], "─", [symbol];
- ["\\loz"; "\\lozenge"                                ], "◊", [symbol];
+ ["\\loz"; "\\lozenge";"<>"                                ], "◊", [symbol];
  ["\\starf"; "\\bigstar"                              ], "★", [symbol];
  ["\\phone"                                          ], "☎", [symbol];
  ["\\female"                                         ], "♀", [symbol];
@@ -174,6 +175,7 @@ let predefined_virtuals = [
  ["\\UnderParenthesis"                               ], "︶", [symbol];
  ["\\OverBrace"                                      ], "︷", [symbol];
  ["\\UnderBrace"                                     ], "︸", [symbol];
+ ["\\Yang"                                           ], "⚊", [symbol];
 (* }}} *)
 
 (* {{{ fraction *)
@@ -713,7 +715,7 @@ let predefined_virtuals = [
  ["\\wedgeq"                                         ], "≙", [equivalence];
  ["\\veeeq"                                          ], "≚", [equivalence];
  ["\\trie"; "\\triangleq"                             ], "≜", [equivalence];
- ["\\def"                                            ], "≝", [equivalence];
+ ["\\def";":=" ], "≝", [equivalence];
  ["\\equest"; "\\questeq"                             ], "≟", [equivalence];
  ["\\ne"; "\\neq"; "\\NotEqual"                        ], "≠", [equivalence];
  ["\\equiv"; "\\Congruent"                            ], "≡", [equivalence];
@@ -827,7 +829,7 @@ let predefined_virtuals = [
  ["\\NotNestedLessLess"                              ], "⒡̸", [circle];
  ["\\NotNestedGreaterGreater"                        ], "⒢̸", [circle];
  ["\\oS"; "\\circledS"                                ], "Ⓢ", [circle];
- ["\\cir"                                            ], "○", [circle];
+ ["\\cir";                                            ], "○", [circle];
  ["\\xcirc"; "\\bigcirc"                              ], "◯", [circle];
 (* }}} *)
 
@@ -838,7 +840,7 @@ let predefined_virtuals = [
  ["\\sdotb"; "\\dotsquare"                            ], "⊡", [square];
  ["\\uhblk"                                          ], "▀", [square];
  ["\\lhblk"                                          ], "▄", [square];
- ["\\squ"; "\\square"; "\\Square"                      ], "□", [square];
+ ["\\squ"; "\\square"; "\\Square";"[]"                      ], "□", [square];
  ["\\squf"; "\\squarf"; "\\blacksquare"                ], "▪", [square];
  ["\\rect"                                           ], "▭", [square];
  ["\\marker"                                         ], "▮", [square];
@@ -1501,62 +1503,79 @@ let load_predefined_virtuals () =
 ;;
 
 let predefined_classes = [
- [ "→"; "⇉"; "⇒"; "⇝"; "⇾"; "⤍"; "⤏"; "⤳"; "⥤"; "⥰"; ] ;
- [ "≤"; "≲"; "≼"; "≰"; "≴"; "⋠"; ];
- [ "_" ; "⎽"; "⎼"; "⎻"; "⎺"; ];
- [ "<"; "≺"; "≮"; "⊀"; ] ;
- ["a"; "α"; "𝕒"; ] ;
- ["A"; "ℵ"; "𝔸"; ] ;
- ["b"; "β"; "ß"; "𝕓"; ] ;
- ["B"; "ℶ"; "ℬ"; "𝔹"; ] ;
- ["c"; "𝕔"; ] ;
- ["C"; "ℭ"; "∁"; ] ;
- ["d"; "δ"; "∂"; "𝕕"; "ⅆ"; ] ;
- ["D"; "Δ"; "𝔻"; "ⅅ"; ] ;
- ["e"; "ɛ"; "ε"; "ϵ"; "Є"; "ℯ"; "𝕖"; "ⅇ"; ] ;
- ["E"; "ℰ"; "𝔼"; ] ;
- ["f"; "φ"; "ψ"; "ϕ"; "⨍"; "𝕗"; ] ;
- ["F"; "Φ"; "Ψ"; "ℱ"; "𝔽"; ] ;
- ["g"; "γ"; "ℊ"; "𝕘"; ] ;
- ["G"; "Γ"; "𝔾"; ] ;
- ["h"; "η"; "ℌ"; "ℎ"; "𝕙"; ] ;
- ["H"; "ℋ"; "ℍ"; ] ;
- ["i"; "ι"; "ℐ"; "𝕚"; "ⅈ"; ] ;
- ["I"; "𝕀"; ] ;
- ["j"; "𝕛"; ] ;
- ["J"; "Ј"; "𝕁"; ] ;
- ["k"; "κ"; "𝕜"; ] ;
- ["K"; "𝕂"; ] ;
- ["l"; "λ"; "𝕝"; ] ;
- ["L"; "Λ"; "𝕃"; ] ;
- ["m"; "μ"; "𝕞"; ] ;
- ["M"; "ℳ"; "𝕄"; ] ;
- ["n"; "𝕟"; ] ;
- ["N"; "ℕ"; "№"; ] ;
- ["o"; "θ"; "ϑ"; "𝕠"; "ø"; "∘"; ] ;
- ["O"; "Θ"; "𝕆"; ] ;
- ["p"; "π"; "𝕡"; ] ;
- ["P"; "Π"; "℘"; "ℙ"; ] ;
- ["q"; "𝕢"; ] ;
- ["Q"; "ℚ"; ] ;
- ["r"; "ρ"; "ϱ"; "𝕣"; ] ;
- ["R"; "ℛ"; "ℜ"; "ℝ"; ] ;
- ["s"; "σ"; "ς"; "𝕤"; ] ;
- ["S"; "Σ"; "𝕊"; ] ;
- ["t"; "τ"; "𝕥"; ] ;
- ["T"; "𝕋"; ] ;
- ["u"; "𝕦"; ] ;
- ["U"; "𝕌"; ] ;
- ["v"; "ν"; "𝕧"; ] ;
- ["V"; "𝕍"; ] ;
- ["w"; "ω"; "𝕨"; ] ;
- ["W"; "Ω"; "𝕎"; ] ;
- ["x"; "ξ"; "χ"; "ϰ"; "𝕩"; ] ;
- ["X"; "Ξ"; "𝕏"; ] ;
- ["y"; "υ"; "𝕪"; ] ;
- ["Y"; "ϒ"; "𝕐"; ] ;
- ["z"; "ζ"; "𝕫"; ] ;
- ["Z"; "ℨ"; "ℤ"; ] ;
+ ["→"; "⇉"; "⇒"; "⇝"; "⇾"; "⤍"; "⤏"; "⤳"; "⥤"; "⥰"; ] ;
+ ["≤"; "≲"; "≼"; "≰"; "≴"; "⋠"; ];
+ ["_" ; "⎽"; "⎼"; "⎻"; "⎺"; ];
+ ["<"; "≺"; "≮"; "⊀"; "〈"; "«"; "❬"; "❮"; "❰";] ;
+ ["("; "❨"; "❪"; "❲"; "（"; ];
+ [")"; "❩"; "❫"; "❳"; "）"; ]; 
+ ["{"; "❴";];
+ ["}"; "❵";];
+ ["□"; "◽"; "▪"; "◾"; ];
+ ["◊"; "♢"; "⧫"; "♦"; ];
+ [">"; "〉"; "»"; "❭"; "❯"; "❱"; ];       
+ ["a"; "α"; "𝕒"; "𝐚"; "𝛂"; ] ;
+ ["A"; "ℵ"; "𝔸"; "𝐀";] ;
+ ["b"; "β"; "ß"; "𝕓"; "𝐛"; "𝛃"; ] ;
+ ["B"; "ℶ"; "ℬ"; "𝔹"; "𝐁";] ;
+ ["c"; "𝕔"; "𝐜";] ;
+ ["C"; "ℭ"; "∁"; "𝐂";] ;
+ ["d"; "δ"; "∂"; "𝕕"; "ⅆ"; "𝐝"; "𝛅";] ;
+ ["D"; "Δ"; "𝔻"; "ⅅ"; "𝐃"; "𝚫"; ] ;
+ ["e"; "ɛ"; "ε"; "ϵ"; "Є"; "ℯ"; "𝕖"; "ⅇ"; "𝐞"; "𝛆"; "𝛜"; ] ;
+ ["E"; "ℰ"; "𝔼"; "𝐄";] ;
+ ["f"; "φ"; "ψ"; "ϕ"; "⨍"; "𝕗"; "𝐟"; "𝛟"; "𝛙"; ] ;
+ ["F"; "Φ"; "Ψ"; "ℱ"; "𝔽"; "𝐅"; "𝚽"; "𝚿"; ] ;
+ ["g"; "γ"; "ℊ"; "𝕘"; "𝐠"; "𝛄"; ] ;
+ ["G"; "Γ"; "𝔾"; "𝐆"; "𝚪"; ] ;
+ ["h"; "η"; "ℌ"; "ℎ"; "𝕙"; "𝐡";] ;
+ ["H"; "ℋ"; "ℍ"; "𝐇";] ;
+ ["i"; "ι"; "ℐ"; "𝕚"; "ⅈ"; "𝐢"; "𝛊"; ] ;
+ ["I"; "𝕀"; "𝐈";] ;
+ ["j"; "𝕛"; "𝐣";] ;
+ ["J"; "Ј"; "𝕁"; "𝐉";] ;
+ ["k"; "κ"; "𝕜"; "𝐤"; "𝛋"; ] ;
+ ["K"; "𝕂"; "𝐊"; ] ;
+ ["l"; "λ"; "𝕝"; "𝐥"; "𝛌"; ] ;
+ ["L"; "Λ"; "𝕃"; "𝐋"; "𝚲"; ] ;
+ ["m"; "μ"; "𝕞"; "𝐦"; "𝛍"; ] ;
+ ["M"; "ℳ"; "𝕄"; "𝐌"; ] ;
+ ["n"; "𝕟"; "𝐧"; "𝛈"; ] ;
+ ["N"; "ℕ"; "№"; "𝐍";] ;
+ ["o"; "θ"; "ϑ"; "𝕠"; "∘";  "ø"; "○"; "𝐨"; "𝛉"; ] ;
+ ["O"; "Θ"; "𝕆"; "𝐎"; "𝚯"; "𝚹";] ;
+ ["p"; "π"; "𝕡"; "𝐩"; "𝛑";] ;
+ ["P"; "Π"; "℘"; "ℙ"; "𝐏"; "𝚷"; ] ;
+ ["q"; "𝕢"; "𝐪";] ;
+ ["Q"; "ℚ"; "𝐐";] ;
+ ["r"; "ρ"; "ϱ"; "𝕣"; "𝐫"; "𝛒"; "𝛠"; ] ;
+ ["R"; "ℛ"; "ℜ"; "ℝ"; "𝐑";] ;
+ ["s"; "σ"; "ς"; "𝕤"; "𝐬"; "𝛔"; ] ;
+ ["S"; "Σ"; "𝕊"; "𝐒"; "𝚺"; ] ;
+ ["t"; "τ"; "𝕥"; "𝐭"; "𝛕"; ] ;
+ ["T"; "𝕋"; "𝐓";] ;
+ ["u"; "𝕦"; "𝐮";] ;
+ ["U"; "𝕌"; "𝐔"; ] ;
+ ["v"; "ν"; "𝕧"; "𝐯"; "𝛖"; "𝛎"; ] ;
+ ["V"; "𝕍"; "𝐕";] ;
+ ["w"; "ω"; "𝕨"; "𝐰"; "𝛚"; ] ;
+ ["W"; "Ω"; "𝕎"; "𝐖"; "𝛀"; ] ;
+ ["x"; "ξ"; "χ"; "ϰ"; "𝕩"; "𝐱"; "𝛏"; "𝛘"; "𝛞"; ] ;
+ ["X"; "Ξ"; "𝕏";"𝐗"; "𝚵"; ] ;
+ ["y"; "υ"; "𝕪"; "𝐲";] ;
+ ["Y"; "ϒ"; "𝕐"; "𝐘"; "𝚼"; ] ;
+ ["z"; "ζ"; "𝕫"; "𝐳"; "𝛇"; ] ;
+ ["Z"; "ℨ"; "ℤ"; "𝐙";] ;
+ ["0"; "𝟘"; ] ;
+ ["1"; "𝟙"; ] ;
+ ["2"; "𝟚"; ] ;
+ ["3"; "𝟛"; ] ;
+ ["4"; "𝟜"; ] ;
+ ["5"; "𝟝"; ] ;
+ ["6"; "𝟞"; ] ;
+ ["7"; "𝟟"; ] ;
+ ["8"; "𝟠"; ] ;
+ ["9"; "𝟡"; ] ;
  ]
 ;;