SoftHdwRouter.cm
Copyright Ó 1988 by Xerox Corporation. All rights reserved.
Barth, January 2, 1989 9:30:56 am PST
Minsky, July 31, 1989 4:05:43 am PDT
CellLibraries
Install Rsh
Install SunNFSRemoteFile
Run SoftHdwPlacer
Run SoftHdwRouter
Run SoftHdwRouterOutput
Statistics On
← &name ← "SoftHdwCoreB"
← Process.SetPriority[Process.priorityBackground]
← &ct ← CoreIO.RestoreCellType[fileName: Rope.Cat[&name, ".core"]]
← &ct ← CoreOps.Recast[&ct]
← &flat ← SoftHdwCompiler.Flatten[&ct]
← &sizes ← NEW[SoftHdwCompiler.ArrayPositionRec ← [chip: [1,1], minorArray: [32,32], grain: [4,4],orientation: Horizontal,type: Output]]
← &grainPositions ← SoftHdwCompiler.TimberWolf[&flat, &sizes, 100]
← &place ← SoftHdwCompiler.HayBaler[&flat, &sizes, &grainPositions]
← &channeled ← SoftHdwCompiler.AddChannels[&place, 2]
← &routeResult ← SoftHdwCompiler.CreateSurfaceAndRoute[&channeled]
← &route ← &routeResult.route
← &incompleteNetEnds ← &routeResult.incompleteNetEnds
← &incomplete ← &routeResult.incomplete
← &program ← SoftHdwCompiler.ProgramFromPlaceAndRoute[&channeled, &route, &incompleteNetEnds]
← &design ← SoftHdwAssembly.PrintAndDraw[&sizes, &program]