aboutsummaryrefslogtreecommitdiff
path: root/desiredata/extra/pureunity/locale
diff options
context:
space:
mode:
Diffstat (limited to 'desiredata/extra/pureunity/locale')
-rw-r--r--desiredata/extra/pureunity/locale/english.tcl56
1 files changed, 56 insertions, 0 deletions
diff --git a/desiredata/extra/pureunity/locale/english.tcl b/desiredata/extra/pureunity/locale/english.tcl
new file mode 100644
index 00000000..8dca411d
--- /dev/null
+++ b/desiredata/extra/pureunity/locale/english.tcl
@@ -0,0 +1,56 @@
+
+say_namespace summary {
+ foreach {x y} {
+ f "floating-point"
+ ~ "signal"
+ \# "grid"
+ } {
+ say_category basic<$x>
+ say $x.do " ($y)"
+ say $x.norm " ($y)"
+ say $x.packunpack3 " ($y)"
+ say $x.swap " ($y)"
+ say $x.taa " ($y)"
+ }
+
+ say_category interfaces
+ proc pu_say {} {
+ }
+
+ pu_say antireflexive {t } ""
+ pu_say reflexive {t } ""
+
+ pu_say commutative {t } ""
+ pu_say anticommutative {t } ""
+ pu_say antisymmetric {t } ""
+
+ pu_say associative {t } ""
+ pu_say distributive {t } ""
+ pu_say invertible {t } ""
+
+ pu_say partialorder {t } "partial order (open)"
+ pu_say partialordereq {t } "partial order (closed)"
+ pu_say totalorder {t } "total order (open)"
+ pu_say totalordereq {t } "total order (closed)"
+ pu_say equivalence {t } "equivalence relation"
+
+ pu_say transitive {t } "transitive: "
+ pu_say trichotomy {t } "trichotomy: either equal or less or greater"
+ pu_say operator1 {t } "1-input operator"
+ pu_say operator2 {t } "2-input operator"
+
+ say_category cancellators
+ say associator "(ab)c-a(bc)"
+ say commutator "ab-ba"
+ say distributor "a&(b^c)-(ab^ac)"
+ say invertor "ab/b-a"
+
+ say_category misc
+ say twice ""
+ say 3times ""
+ say 4times ""
+ say ^ "xor"
+ say error ""
+ say protocols-tree ""
+ say tree ""
+}