aboutsummaryrefslogtreecommitdiff
path: root/src/algebra
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra')
-rw-r--r--src/algebra/boolean.spad.pamphlet2
-rw-r--r--src/algebra/domain.spad.pamphlet6
2 files changed, 4 insertions, 4 deletions
diff --git a/src/algebra/boolean.spad.pamphlet b/src/algebra/boolean.spad.pamphlet
index a7ffceb4..7562b3b5 100644
--- a/src/algebra/boolean.spad.pamphlet
+++ b/src/algebra/boolean.spad.pamphlet
@@ -427,7 +427,7 @@ Reference(S:Type): Type with
if S has SetCategory then
coerce p ==
- prefix('ref::Identifier::OutputForm, [p.value::OutputForm])
+ prefix('ref::OutputForm, [p.value::OutputForm])
@
diff --git a/src/algebra/domain.spad.pamphlet b/src/algebra/domain.spad.pamphlet
index dc9ea2f8..4fc644c9 100644
--- a/src/algebra/domain.spad.pamphlet
+++ b/src/algebra/domain.spad.pamphlet
@@ -29,9 +29,9 @@ ConstructorKind(): Public == Private where
domain: % ++ `domain' is the kind of domain constructors
package: % ++ `package' is the kind of package constructors.
Private == add
- category == 'category : %
- domain == 'domain : %
- package == 'package : %
+ category == %categoryKind$Foreign(Builtin)
+ domain == %domainKind$Foreign(Builtin)
+ package == %packageKind$Foreign(Builtin)
k1 = k2 == %peq(k1,k2)$Foreign(Builtin)
coerce(k: %): OutputForm == k : OutputForm