retabbed analyze.scm