convert to r7rs library
port (weinholt crypto aes) to r7rs library