common-lispBooleans and Generalized Booleans