add equal.scm