<> <> <> DIRECTORY CacheModels USING [Cache]; AssociativeCache: CEDAR DEFINITIONS = BEGIN NewCache: PUBLIC PROC [lines: NAT _ 100, quadsPerLine: NAT _ 2, wordsPerQuad: NAT _ 4, lru: BOOL _ FALSE, realCache, mapCache: CacheModels.Cache _ NIL] RETURNS [cache: CacheModels.Cache] <> END.