How does loop in Scheme?