%%HP: T(1)A(D)F(.);
½
"QUADRATISCHE-ERG─NZUNG

 ( A2*X^2+A1*X+A0=0 )"
ì TEX
  ½ TEX ":A2:"
INPUT OBJì TEX
":A1:" INPUT OBJì
TEX ":A0:" INPUT
OBJì ì A2 A1 A0
    ½ '-A1/A2/2+â(
SQ(A1/2/A2)-A0/A2)'
EVAL X1 ìTAG '-A1/2
/A2-â(SQ(A1/A2/2)-
A0/A2)' EVAL X2
ìTAG
    ╗
  ╗
╗