この2次関数の極値を探しましょう。\
四角を極値だと思うところに持っていきましょう。

リセット

判定

L1 = Remove(Sequence[i, i, -5, 5, 0.1], {0})
L = Sequence(i, i, -3, 3, 0.1)
a = RandomElement(L1)
b = RandomElement(L)
c = RandomElement(L)
A = (-6.550268987012641, 2.32321285715903)
B = (-6.550268987012641, 1.7805369583080646)
poly1, f, g, h, i, C, D = Polygon(A, B, 4)
d: y = (a * (x - b)^(2)) + c
E: (b, c)
e = IsInRegion(E, poly1)

Tool: Tool1
Input: A
Output: h, g

B: (x(A), 0)
C: (0, y(A))
g = Segment(A, C)
h = Segment(A, B)