A sample Warehouse management app in Common Lisp - View it on GitHub