Update 19-6.scm

Simpler version