(if (and(current- goal (has-spot "part>(hole>(side>(loc-x)(loc"y>) drill-with-spot-drill) (control-rule pref-bnds-drill-Rith-spot-drill-in-milling-machine31 (if (and (current-goal(has"spot (part>(hole>(side)<loc-x)(loc-y>)) (diff (side-pair-6>(side-pair-3)))) ( then prefer bindings(mach).(mach4>)(hd>. <holding-dev5>)((sp>, (side-pair-6>) (mach).(mach1>)(chd>. <holding-dev 2 )(sp>, <side-pair-3))