#!/usr/bin/guile
!#

(import (sph) (sph fun marketing-bs))
(display-marketing-bs 10)