(load "../cph/v2/load")
(cd "~/TAMI/harveyj")
(generate-schema-displays "../2006/07/data-schema.scm" "schema-displays.scm")