MebesBitsPlot69AD.cm

McCreight, November 7, 1984 9:44:10 am PST

run CountedVMImpl

run ImagerPackage

run MebesBitsCedar

← %MebesBitsCedar.center ← [x: 4804, y: 4724]

← %MebesBitsCedar.scale ← 1.0

← &sc ← %MebesBitsCedar.NewDisplayContext[]

← %MebesBitsCedar.ResetContext[&sc]

← %Imager.SetColor[&sc, %Imager.MakeGray[0.5]]

← %MebesBitsCedar.ReadMebesPatternFile["///mpc69ad/mpc69ad21.aa", &sc]

← %Imager.SetColor[&sc, %Imager.black]

← %MebesBitsCedar.ReadMebesPatternFile["///mpc69ad/mpc69ad10.aa", &sc]