N..... USE_LENGTH_UNITS(CANON_UNITS_MM)
 N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... SET_G92_OFFSET(0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... SET_XY_ROTATION(0.0000)
 N..... SET_FEED_REFERENCE(CANON_XYZ)
 N..... COMMENT("Storm door latch cam ")
 N..... COMMENT("Outside milling, clamped on center axis")
 N..... COMMENT("Ed Nisley - Nov 2006 - Mar 2007")
 N..... COMMENT("-----------------")
 N..... COMMENT("tool change XYZ")
 N..... COMMENT("traverse clearance")
 N..... COMMENT("-----------------")
 N..... COMMENT("Cutter and material values")
 N..... COMMENT("cutter diameter from Sherline_mm.tbl entry, per #1113 tool slot")
 N..... COMMENT("chip load, inches/tooth -> mm/tooth")
 N..... COMMENT("number of teeth")
 N..... COMMENT("tool slot holding this cutter: verify this in *.tbl entry")
 N..... COMMENT("max cut depth")
 N..... COMMENT("max cut width")
 N..... COMMENT("cutting speed, surface ft/min > mm/min")
 N..... COMMENT("spindle RPM")
 N..... COMMENT("milling feed, mm/min = RPM * load * teeth")
 N..... COMMENT("-----------------")
 N..... COMMENT("Part dimensions")
 N..... COMMENT("shaft Z thickness")
 N..... COMMENT("cam Z thickness")
 N..... COMMENT("shaft Z passes")
 N..... COMMENT("cam Z passes")
 N..... COMMENT("shaft Z cut depth")
 N..... COMMENT("cam Z cut depth")
 N..... COMMENT("raw part OD -> radius")
 N..... COMMENT("shaft finished OD and cam small OD")
 N..... COMMENT("cam large OD")
 N..... COMMENT("shaft radius passes")
 N..... COMMENT("cam OD radius passes")
 N..... COMMENT("shaft radius cut depth")
 N..... COMMENT("cam OD radius cut depth")
 N..... COMMENT("half-angle of cam solid arc")
 N..... COMMENT("inside corner fillet radius")
 N..... COMMENT("-----------------")
 N..... COMMENT("Define setup")
 N..... COMMENT("absolute coordinates")
 N..... COMMENT("metric units")
 N..... USE_LENGTH_UNITS(CANON_UNITS_MM)
 N..... COMMENT("set spindle speed")
 N..... SET_SPINDLE_SPEED(4696.9386)
 N..... COMMENT("set milling feed")
 N..... SET_FEED_RATE(119.3022)
 N..... COMMENT("set up the tool")
 N..... SELECT_POCKET(1)
 N..... START_CHANGE()
 N..... STOP_SPINDLE_TURNING()
 N..... CHANGE_TOOL(1)
 N..... COMMENT("-----------------")
 N..... MESSAGE("Verify METRIC Sherline.tbl file!")
 N..... MESSAGE("Align XY=0 at center, Z=0 at surface, spindle to match S value, hit [Run]")
 N..... COMMENT("wait for Resume")
 N..... PROGRAM_STOP()
 N..... COMMENT("spindle CW")
 N..... START_SPINDLE_CLOCKWISE()
 N..... COMMENT("get air for alignment")
 N..... STRAIGHT_TRAVERSE(0.0000, 0.0000, 10.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("-----------------")
 N..... COMMENT("Commence cutting!")
 N..... COMMENT("Start cutter compensation")
 N..... COMMENT("External cutting: CCW around the part")
 N..... COMMENT("alignment move")
 N..... STRAIGHT_TRAVERSE(-1.6000, -13.6750, 10.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("comp on: tool to right, D = cutter")
 N..... COMMENT("interpreter: cutter radius compensation on right")
 N..... COMMENT("first entry move")
 N..... STRAIGHT_FEED(-0.8063, -10.4750, 10.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("second entry move to part edge")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, 10.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("to traverse level")
 N..... STRAIGHT_TRAVERSE(0.0000, -9.6687, 10.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("--- Cut shaft")
 N..... COMMENT("Z iteration counter - start at surface")
 N..... COMMENT("initial Z cut depth")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, -10.0094, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, 0.0000, 1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -10.3500, 0.0000, -9.5437, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -9.0781, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -0.0000, 1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -9.4188, 0.0000, -8.6125, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, -8.1469, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, 0.0000, 1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -8.4875, 0.0000, -7.6812, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -7.2156, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -0.0000, 1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -8.6125, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, -10.0094, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, 0.0000, 1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -10.3500, 0.0000, -9.5437, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -9.0781, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -0.0000, 1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -9.4188, 0.0000, -8.6125, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, -8.1469, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, 0.0000, 1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -8.4875, 0.0000, -7.6812, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -7.2156, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -0.0000, 1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -8.6125, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -0.8340, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, -10.0094, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, 0.0000, 1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -10.3500, 0.0000, -9.5437, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -9.0781, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -0.0000, 1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -9.4188, 0.0000, -8.6125, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, -8.1469, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, 0.0000, 1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -8.4875, 0.0000, -7.6812, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -7.2156, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -0.0000, 1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -8.6125, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -1.6680, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, -10.0094, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, 0.0000, 1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -10.3500, 0.0000, -9.5437, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -9.0781, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -0.0000, 1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -9.4188, 0.0000, -8.6125, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, -8.1469, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, 0.0000, 1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -8.4875, 0.0000, -7.6812, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -7.2156, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -0.0000, 1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -8.6125, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -2.5020, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, -10.0094, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, 0.0000, 1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -10.3500, 0.0000, -9.5437, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -9.0781, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -0.0000, 1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -9.4188, 0.0000, -8.6125, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, -8.1469, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, 0.0000, 1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -8.4875, 0.0000, -7.6812, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -7.2156, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -0.0000, 1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -8.6125, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -3.3360, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, -10.0094, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -8.7375, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -10.3500, 0.0000, -9.5437, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -9.0781, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -7.8062, 0.0000, -0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -9.4188, 0.0000, -8.6125, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, -8.1469, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -6.8750, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -8.4875, 0.0000, -7.6812, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -7.2156, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -5.9437, 0.0000, -0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -8.6125, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("--- Cut cam OD")
 N..... COMMENT("Z iteration counter - at top of cam")
 N..... COMMENT("initial Z cut depth - top of cam = bottom of shaft")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, -10.3775, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.3775, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, -10.3775, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, 0.0000, 1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.3775, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, -10.3775, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, 0.0000, 1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.3775, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -9.6687, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, 0.0000, 1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("relative coords")
 N..... COMMENT("interpreter: distance mode changed to incremental")
 N..... COMMENT("loop outward by min radius")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.4750, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("loop inward to new radius")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, -10.3775, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("abs coords")
 N..... COMMENT("interpreter: distance mode changed to absolute")
 N..... COMMENT("one pass CCW around shaft")
 N..... ARC_FEED(0.0000, -9.4737, 0.0000, 0.0000, 1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("align to max OD")
 N..... ARC_FEED(0.0000, -11.2813, 0.0000, -10.3775, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... ARC_FEED(0.0000, -9.6687, 0.0000, -10.4750, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("--- Cut cam ID")
 N..... COMMENT("This goes in to shaft OD")
 N..... COMMENT("Realign for CW passes in air clearing max OD by a bit, CCW cutting in part")
 N..... COMMENT("reposition at clearance OD facing CW for next move")
 N..... STRAIGHT_TRAVERSE(0.0000, -9.6687, 10.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("cutter dia + 2 x min fillet radius")
 N..... COMMENT(""exterior material contour" for air cutting")
 N..... COMMENT("half-circle to new OD, cutter still to right")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, -12.0250, -1, 10.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("O-P - dist origin to outer circle center")
 N..... COMMENT("alpha - angle cam edge to outer circle center")
 N..... COMMENT("beta - angle Y axis to outer circle center")
 N..... COMMENT("O-B - dist origin to B tangent on cam edge")
 N..... COMMENT("A - X coord fairing circle tangent to OD")
 N..... COMMENT("A - Y coord fairing circle tangent to OD")
 N..... COMMENT("B - X coord fairing circle tangent to cam")
 N..... COMMENT("B - Y coord fairing circle tangent to cam")
 N..... COMMENT("P - X coord fairing circle center")
 N..... COMMENT("P - Y coord fairing circle center")
 N..... COMMENT("Z iteration counter - start at top of cam again")
 N..... COMMENT("initial Z cut level - top of cam = bottom of shaft")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -14.3813, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-10.0907, 2.4441, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-9.5440, 1.5482, -10.3398, 1.6773, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(9.5440, 1.5482, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(10.0907, 2.4441, 10.3398, 1.6773, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-9.1935, 2.1525, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-8.6449, 1.2687, -9.4426, 1.3858, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(8.6449, 1.2687, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(9.1935, 2.1525, 9.4426, 1.3858, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-8.2937, 1.8602, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-7.7431, 0.9910, -8.5428, 1.0934, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(7.7431, 0.9910, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(8.2937, 1.8602, 8.5428, 1.0934, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-7.3903, 1.5667, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-6.8376, 0.7159, -7.6395, 0.7999, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(6.8376, 0.7159, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(7.3903, 1.5667, 7.6395, 0.7999, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-6.4820, 1.2715, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-5.9271, 0.4444, -6.7311, 0.5047, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(5.9271, 0.4444, 0.0000, 0.0000, 1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(6.4820, 1.2715, 6.7311, 0.5047, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -4.1700, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -14.3813, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-10.0907, 2.4441, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-9.5440, 1.5482, -10.3398, 1.6773, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(9.5440, 1.5482, 0.0000, 0.0000, 1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(10.0907, 2.4441, 10.3398, 1.6773, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-9.1935, 2.1525, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-8.6449, 1.2687, -9.4426, 1.3858, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(8.6449, 1.2687, 0.0000, 0.0000, 1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(9.1935, 2.1525, 9.4426, 1.3858, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-8.2937, 1.8602, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-7.7431, 0.9910, -8.5428, 1.0934, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(7.7431, 0.9910, 0.0000, 0.0000, 1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(8.2937, 1.8602, 8.5428, 1.0934, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-7.3903, 1.5667, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-6.8376, 0.7159, -7.6395, 0.7999, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(6.8376, 0.7159, 0.0000, 0.0000, 1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(7.3903, 1.5667, 7.6395, 0.7999, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-6.4820, 1.2715, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-5.9271, 0.4444, -6.7311, 0.5047, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(5.9271, 0.4444, 0.0000, 0.0000, 1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(6.4820, 1.2715, 6.7311, 0.5047, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -5.1533, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -14.3813, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-10.0907, 2.4441, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-9.5440, 1.5482, -10.3398, 1.6773, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(9.5440, 1.5482, 0.0000, 0.0000, 1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(10.0907, 2.4441, 10.3398, 1.6773, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-9.1935, 2.1525, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-8.6449, 1.2687, -9.4426, 1.3858, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(8.6449, 1.2687, 0.0000, 0.0000, 1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(9.1935, 2.1525, 9.4426, 1.3858, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-8.2937, 1.8602, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-7.7431, 0.9910, -8.5428, 1.0934, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(7.7431, 0.9910, 0.0000, 0.0000, 1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(8.2937, 1.8602, 8.5428, 1.0934, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-7.3903, 1.5667, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-6.8376, 0.7159, -7.6395, 0.7999, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(6.8376, 0.7159, 0.0000, 0.0000, 1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(7.3903, 1.5667, 7.6395, 0.7999, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-6.4820, 1.2715, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-5.9271, 0.4444, -6.7311, 0.5047, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(5.9271, 0.4444, 0.0000, 0.0000, 1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(6.4820, 1.2715, 6.7311, 0.5047, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -6.1367, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("to new Z level")
 N..... STRAIGHT_FEED(0.0000, -14.3813, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("radius iteration counter")
 N..... COMMENT("initial radius - start at raw OD")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-10.0907, 2.4441, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-9.5440, 1.5482, -10.3398, 1.6773, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(9.5440, 1.5482, 0.0000, 0.0000, 1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(10.0907, 2.4441, 10.3398, 1.6773, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-9.1935, 2.1525, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-8.6449, 1.2687, -9.4426, 1.3858, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(8.6449, 1.2687, 0.0000, 0.0000, 1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(9.1935, 2.1525, 9.4426, 1.3858, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-8.2937, 1.8602, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-7.7431, 0.9910, -8.5428, 1.0934, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(7.7431, 0.9910, 0.0000, 0.0000, 1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(8.2937, 1.8602, 8.5428, 1.0934, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-7.3903, 1.5667, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-6.8376, 0.7159, -7.6395, 0.7999, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(6.8376, 0.7159, 0.0000, 0.0000, 1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(7.3903, 1.5667, 7.6395, 0.7999, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("O-Q - dist orgin to current inner circle center")
 N..... COMMENT("gamma - angle cam edge to inner circle center")
 N..... COMMENT("delta - angle Y axis to inner circle center")
 N..... COMMENT("O-C - dist origin to C tangent on cam edge")
 N..... COMMENT("C - X coord inner circle tangent to cam")
 N..... COMMENT("C - Y coord inner circle tangent to cam")
 N..... COMMENT("D - X coord inner circle tangent to shaft")
 N..... COMMENT("D - Y coord inner circle tangent to shaft")
 N..... COMMENT("Q - X coord inner circle center")
 N..... COMMENT("Q - Y coord inner circle center")
 N..... COMMENT("left side of air pass")
 N..... ARC_FEED(-14.1058, 2.8010, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(-13.0659, 3.4108, -13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("left cam edge")
 N..... STRAIGHT_FEED(-6.4820, 1.2715, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to current shaft OD")
 N..... ARC_FEED(-5.9271, 0.4444, -6.7311, 0.5047, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("current shaft OD")
 N..... ARC_FEED(5.9271, 0.4444, 0.0000, 0.0000, 1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to cam edge")
 N..... ARC_FEED(6.4820, 1.2715, 6.7311, 0.5047, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right cam edge")
 N..... STRAIGHT_FEED(13.0659, 3.4108, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("fillet to air pass")
 N..... ARC_FEED(14.1058, 2.8010, 13.3150, 2.6440, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("right side of air pass")
 N..... ARC_FEED(0.0000, -14.3813, 0.0000, 0.0000, -1, -7.1200, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("tick radius counter")
 N..... COMMENT("figure next radius")
 N..... COMMENT("tick loop counter")
 N..... COMMENT("next Z level")
 N..... COMMENT("-----------------")
 N..... COMMENT("spindle off")
 N..... STOP_SPINDLE_TURNING()
 N..... COMMENT("get air")
 N..... STRAIGHT_TRAVERSE(0.0000, -14.3813, 75.0000, 0.0000, 0.0000, 0.0000)
 N..... COMMENT("cutter comp off")
 N..... COMMENT("interpreter: cutter radius compensation off")
 N..... COMMENT("return home")
 N..... STRAIGHT_TRAVERSE(75.0000, 0.0000, 75.0000, 0.0000, 0.0000, 0.0000)
 N..... MESSAGE("Done!")
 N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
 N..... SET_XY_ROTATION(0.0000)
 N..... SET_FEED_MODE(0)
 N..... SET_FEED_RATE(0.0000)
 N..... STOP_SPINDLE_TURNING()
 N..... SET_SPINDLE_MODE(0.0000)
 N..... PROGRAM_END()