-- ///cd16/testcif.cm

run CornerStitchingimpl

run FlatCif

← &t ← CD.FetchTechnology[$cmos]

← &pol ← CD.FetchLevel[t: &t, uniqueKey: $pol]

← &met ← CD.FetchLevel[t: &t, uniqueKey: $met]

← %CDProperties.PutPropOnLevel[onto: &pol, prop: $CDxCIFBloatActive, val: NEW[INT←-6]]

← FlatCif.partWidth ← 40000

← FlatCif.partHeight ← 40000

← FlatCif.partWidth ← 40

← FlatCif.partHeight ← 40

← &d ← CDViewer.FindDesign["test", FALSE]

← &rp ← CDRects.CreateRect[[200, 200], &pol]

← &rm ← CDRects.CreateRect[[200, 200], &met]

← CDOps.AddAnObject[design: &d, ob: &rp, location: [0, 0], orientation: 0]

← CDOps.AddAnObject[design: &d, ob: &rm, location: [0, 0], orientation: 0]