<> <> <> <<>> <> DIRECTORY CD, Rope; CDSimpleCells2: CEDAR DEFINITIONS = BEGIN PartialCopy: PROC [ob: CD.Object, design: CD.Design, instances: LIST OF Rope.ROPE_NIL, remove: BOOL_TRUE, prop: ATOM _ $InstanceName, name: Rope.ROPE_NIL] RETURNS [CD.Object]; <<--copy the object; creates a cell >> <<--remove TRUE: >> <<-- all the instances with property prop are and a value in instances are removed >> <<--remove FALSE: >> <<-- only the instances with property prop are and a value in instances are copied>> <<--interest rect: >> <<-- if explicit, it will be copied, >> <<-- if defaulted, a new one will be defaulted >> <<--the origin will be inherited >> END.