A record type representation trick for Scheme