-- TRMint.cm
-- Copyright 1987 by Xerox Corporation.  All rights reserved.
-- Last Edited by: Gasbarro June 22, 1988 0:00:31 am PDT
-- Last Edited by: Richley June 21, 1988 5:20:33 pm PDT

RemoteCommandTool
MachineState "TRMint: Starting"
Install Testarossa
Install PE
Mint
← CedarProcess.SetPriority[background]
← &design ← PW.OpenDesign["TestarossaMint.dale"]
-- ← &design ← CDViewer.FindDesign["TestarossaMint"]
← CDViewer.CreateViewer[&design]
← CDOps.SetMutability[&design]
← &cx ← Sisyph.Create[&design, NIL]

← TRWireIcons.extractSchematic ← TRUE
MachineState "TRMint: Extracting Testarossa"
-- ← &tr ← Sisyph.ES["Testarossa.sch", &cx]
← &tr ← Sisyph.ES["Testarossa.sch", &cx]
← &defaultCapa ← 0.5 -- pf

MachineState "TRMint: CreateCircuit"
← &circuit ← Mint.CreateCircuit[&tr, FALSE, &defaultCapa]

MachineState "TRMint: InputData"
← Mint.InputData[&circuit, LIST[Mint.NodeFromRope["public.Gnd", &circuit], Mint.NodeFromRope["public.Vdd", &circuit], Mint.NodeFromRope["public.GndTTL", &circuit], Mint.NodeFromRope["public.VddTTL", &circuit], Mint.NodeFromRope["public.DVdd", &circuit], Mint.NodeFromRope["public.VRef", &circuit] ], FALSE, &defaultCapa]

-- MachineState "TRMint: CheckLibrary"
-- ← Mint.CheckLibrary[&circuit]
 
MachineState "TRMint: RecordPaths"
← &worst ← Mint.RecordPaths[&circuit, LIST[Mint.NodeFromRope["public.CycDiv2", &circuit], Mint.NodeFromRope["public.CycCK", &circuit], Mint.NodeFromRope["public.CK", &circuit], Mint.NodeFromRope["public.CWS", &circuit], Mint.NodeFromRope["public.CRS", &circuit], Mint.NodeFromRope["public.CAS", &circuit], Mint.NodeFromRope["public.RefCK", &circuit] ]]

MachineState "TRMint: FindSlowestPaths"
← &result ← Mint.FindSlowestPaths[&circuit, 8, TRUE]
← Mint.PrintPathArray[&result.slowNodes, &circuit]
 
-- MachineState "TRMint: KillCircuit"
-- ← Mint.KillCircuit[&circuit]
MachineState "TRMint: Done"