Use alexandria:define-constant

added pode-equal