Added r7rs 'environment'