A credit evaluation expert system written in R5RS Scheme