- define-structure sparse-matrix row column blankrecord
- define-structure sparse-matrix-row element i up downrecord
- define-structure sparse-matrix-column element j left rightrecord
- define-structure sparse-matrix-element value i up down j left rightrecord
- create-sparse-matrix blankprocedure
- sparse-matrix-ref sparse-matrix i jprocedure