.

A=\Biggl[ \hspace{0.9in}\Biggr]

.

.

.

+

-

+

-

D = (2, 0)
B = (0, 2)
A = (2, 2)
C = (0, 0)
poly1, d, b, e, c = Polygon(A, D, C, B)
a11 = -1
a12 = -1
a21 = -1
a22 = 1
TofA = (-4, 0)
TofB = (-2, 2)
TofC = (0, 0)
TofD = (-2, -2)
poly2, i, f, g, h = Polygon(TofB, TofA, TofD, TofC)
inputBox1 = Textfield(a11)
inputBox2 = Textfield(a12)
inputBox3 = Textfield(a21)
inputBox4 = Textfield(a22)
detA: (a11 * a22) - (a12 * a21)
text2: "det(A) = " + detA + ""
midCD = Midpoint(b)
midBC = Midpoint(e)
midAB = Midpoint(c)
midAD = Midpoint(d)
E = Midpoint(midCD, midAB)
poly3, midad, e_1, midab, a = Polygon(midAD, E, midAB, A)
poly4, midab_1, e_2, midbc, b_1 = Polygon(midAB, E, midBC, B)
poly5, midbc_1, e_3, midcd, c_1 = Polygon(midBC, E, midCD, C)
poly6, d_1, midcd_1, e_4, midad_1 = Polygon(D, midCD, E, midAD)
F = Midpoint(i)
G = Midpoint(h)
H = Midpoint(g)
I = Midpoint(f)
J = Midpoint(I, G)
poly7, f_1, j, g_1, tofb = Polygon(F, J, G, TofB)
poly8, j_1, g_2, tofc, h_1 = Polygon(J, G, TofC, H)
poly9, tofa, f_2, j_2, i_1 = Polygon(TofA, F, J, I)
poly10, i_2, j_3, h_2, tofd = Polygon(I, J, H, TofD)
OUL = (-4.800000000000001, 4.800000000000001)
OLR = (4.800000000000001, -4.800000000000001)
PUL = (-4.800000000000001, 4.800000000000001)
PLR = (4.800000000000001, -4.800000000000001)
detAnonzero = If(detA ≟ 0, 0.01, detA)
height1 = 5
height2 = 5
ymax1: height1
ymax2: height2
xmax1: (height1 * x(Corner[1, 5]) / y(Corner[1, 5]))
xmax2: (height2 * x(Corner[2, 5]) / y(Corner[2, 5]))
ymin1: (-ymax1)
ymin2: (-ymax2)
xmin1: (-xmax1)
xmin2: (-xmax2)