Macro Aetypecase

Part of:

package anaphora
( aetypecase < keyform > &body < cases > )

Like ETYPECASE, except binds the result of the keyform to IT (via LET) for
the scope of the cases.