Created sample Guile extension