(module (srfi 146) (mapping mapping-unfold mapping/ordered mapping-unfold/ordered mapping? mapping-contains? mapping-empty? mapping-disjoint? mapping-ref mapping-ref/default mapping-key-comparator mapping-adjoin mapping-adjoin! mapping-set mapping-set! mapping-replace mapping-replace! mapping-delete mapping-delete! mapping-delete-all mapping-delete-all! mapping-intern mapping-intern! mapping-update mapping-update! mapping-update/default mapping-update!/default mapping-pop mapping-pop! mapping-search mapping-search! mapping-size mapping-find mapping-count mapping-any? mapping-every? mapping-keys mapping-values mapping-entries mapping-map mapping-map->list mapping-for-each mapping-fold mapping-filter mapping-filter! mapping-remove mapping-remove! mapping-partition mapping-partition! mapping-copy mapping->alist alist->mapping alist->mapping! alist->mapping/ordered alist->mapping/ordered! mapping=? mapping? mapping<=? mapping>=? mapping-union mapping-intersection mapping-difference mapping-xor mapping-union! mapping-intersection! mapping-difference! mapping-xor! make-mapping-comparator mapping-comparator mapping-min-key mapping-max-key mapping-min-value mapping-max-value mapping-key-predecessor mapping-key-successor mapping-range= mapping-range< mapping-range> mapping-range<= mapping-range>= mapping-range=! mapping-range! mapping-range<=! mapping-range>=! mapping-split mapping-catenate mapping-catenate! mapping-map/monotone mapping-map/monotone! mapping-fold/reverse comparator?) (import scheme) (import (except (chicken base) identity)) (import (chicken platform)) (import (srfi 1)) (import (srfi 128)) (import (srfi 145)) (import (srfi 158)) (register-feature! 'srfi-146) (include "srfi-146/nieper/rbtree.scm") (include "srfi-146/srfi/146.scm") )