and-let*.scm 0 B