Cleaned examples/scheme.hs