<> <> <> DIRECTORY CD, Core; LayoutCheckpoint: CEDAR DEFINITIONS = BEGIN <> <> <> CellType : TYPE = Core.CellType; ROPE: TYPE = Core.ROPE; Wire: TYPE = Core.Wire; <> Store: PROC [cellType: CellType, withCuteFonts: BOOL _ FALSE]; <> <.core".>> <Layout.dale".>> <Shell.dale".>> <<>> Retrieve: PROC [name: ROPE] RETURNS [cellType: CellType]; <.core".>> <> <> Checkpoint: PROC [cellType: CellType, withCuteFonts: BOOL _ FALSE]; <> <Layout.dale".>> <Shell.dale".>> <> <> <<>> SetFromCheckpoint: PROC [cellType: CellType]; <" from the file named "Layout.dale". >> <" from the file named "Shell.dale". >> <> <> FlushLayoutProperties: PROC [cellType: CellType]; END.