CDSimplifyStructure.mesa (a ChipNDale module)
Copyright © 1986 by Xerox Corporation. All rights reserved.
Created by Christian October 28, 1986 10:47:15 am PST
Last edited by: Christian Jacobi, October 28, 1986 10:50:03 am PST
DIRECTORY
CD USING [Design, Object],
IO USING [STREAM];
CDSimplifyStructure: CEDAR DEFINITIONS =
BEGIN
Simplify:
PROC [design:
CD.Design, root:
CD.Object, log:
IO.
STREAM←
NIL];
--tries to simplify the structure, starting with the root object
END.