class-not ( class -- complement ) (original) (raw)

class-not ( class -- complement )

Vocabulary
classes.algebra

Inputs

class	a class

Outputs

complement	a class

Word description
Outputs the complement class of 'class'.

Definition

USING: assocs classes.algebra.private classes.private namespaces
;

IN: classes.algebra

: class-not ( class -- complement )
class-not-cache get [ (class-not) ] cache ;