
<<CDFeatureCheckDragon.cm>>
    <<Jacobi, March 28, 1986 5:43:16 pm PST>>
<<>>
Install CDBottomUp
run CDFeatureCheckImpl

_ &temp _ RefTab.Create[17, NIL, NIL];
<<-- not allowed: $pwel, $imp, $bur, $cut, $cut2, $wndif, $wpdif>>
<<-- not allowed: $errorLayer ....>>
_ &rectlayers _ LIST[$pol, $met, $ndif, $pdif, $nwel, $pwelCont, $nwelCont, $met2, $ovg, $comment]
_ &viasize _ NEW[CD.Rect _ [48, 48, 72, 72]]
_ RefTab.Store[&temp, $CDFeatureCheckKey, NEW[INT]];
_ RefTab.Store[&temp, $CDFeatureCheckName, "Dragon features\n  no burried,  no arbirary angles,  texts restricted to comment"]
_ RefTab.Store[&temp, $Polygon, "not allowed"];
_ RefTab.Store[&temp, $Rect, &rectlayers];
_ RefTab.Store[&temp, $WellRect, LIST[$wpdif, $wNWellCont]];
_ RefTab.Store[&temp, $C2Trans, LIST[$ndif]];
_ RefTab.Store[&temp, $C2WellTrans, LIST[$wpdif]];
_ RefTab.Store[&temp, $C2LTrans, LIST[$ndif]];
_ RefTab.Store[&temp, $C2LWellTrans, LIST[$wpdif]];
_ RefTab.Store[&temp, $C2SimpleCon, LIST[$pol, $ndif, $pwelCont, $nwelCont]];
_ RefTab.Store[&temp, $C2WellSimpleCon, LIST[$wpdif]];
_ RefTab.Store[&temp, $C2LargeSimpleCon, LIST[$pol, $ndif, $pwelCont, $nwelCont, &viasize]];
_ RefTab.Store[&temp, $C2LargeWellSimpleCon, LIST[$wpdif, &viasize]];
_ RefTab.Store[&temp, $C2DifShortCon, LIST[$ndif]];
_ RefTab.Store[&temp, $C2DiffShortCon, LIST[$ndif]];
_ RefTab.Store[&temp, $C2WellDifShortCon, LIST[$wpdif]];
_ RefTab.Store[&temp, $C2Via, $met2];
_ RefTab.Store[&temp, $C2LargeVia, LIST[$met2, &viasize]];
_ RefTab.Store[&temp, $FlipText, $comment];
_ RefTab.Store[&temp, $RigidText, $comment];
_ CDProperties.PutAtomProp[$CDFeatureCheck, $CDFeatureCheck, &temp];
-- CDFeatureCheckDragon parameter set up