Summary
Enigma cipher machine

Metadata

Authors:

John Benediktsson

Words

Tuple classes

Class	Superclass	Slots
enigma	tuple	cogs prev-cogs reflector

Ordinary words

Word	Stack effect
<alphabet>	( -- seq )
<cog>	( -- cog )
<enigma>	( num-cogs -- enigma )
<reflector>	( -- reflector )
encode	( text enigma -- cipher-text )
reset-cogs	( enigma -- enigma )
special?	( n -- ? )

Class predicate words

Word	Stack effect
enigma?	( object -- ? )

Files


Metadata files