Test output for simple-units [ok]

Testing time: 1s

/root/salmonella-run-publish/chicken/bin/csi -script run.scm < /dev/null
(make-units* foo z a (2 b) b (2 c) c (3 c)) .......................... [ PASS]
(units? singleton) ................................................... [ PASS]
(units-name singleton) ............................................... [ PASS]
(units-base-name singleton) .......................................... [ PASS]
(units-units-system singleton) ....................................... [ PASS]
(units-unit-names singleton) ......................................... [ PASS]
(units-unit-factor singleton 'foo) ................................... [ PASS]
(+ (quantity 23 h time-units*) (quantity 23 m time-units*) (qua... ... [ PASS]
(+ (quantity 23 h) (quantity 23 m) (quantity 23 s)) .................. [ PASS]
(units=? time-units time-units*) ..................................... [ PASS]
(units-system-name) .................................................. [ PASS]
(list? (units-system-catalog)) ....................................... [ PASS]
(units-system-units 'time) ........................................... [ PASS]
(units-system-units/unit 'd) ......................................... [ PASS]