class-and ( first second -- class )
Factor handbook » The language » Objects » Classes » Class operations

Prev:	class<= ( first second -- ? )
Next:	class-or ( first second -- class )

Vocabulary
classes.algebra

Inputs

first	a class
second	a class

Outputs

class

a class

Word description
Outputs the largest anonymous class contained in both class1 and class2.

Definition

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

IN: classes.algebra

: class-and ( first second -- class )
    class-and-cache get [ (class-and) ] symmetric-class-op ;