Feuerbach:=proc() local m,n: TouchCeCe ( NinePointCircle (Te(m,n)) , Incircle(m,n) ): end:
TouchCeCe ( NinePointCircle (Te(m,n)) , Incircle(m,n) ):
end: