Parameterized Gauss System

GeoGebra Commands & Parameters

1. Append(Take[lista1, 1, m], Element[listater, 1]) → listaf1
2. Append(Take[lista7, 1, m], Element[listater, 5]) → listaf5
3. Append(Take[lista8, 1, m], Element[listater, 6]) → listaf6
4. Append(Take[lista2, 1, m], Element[listater, 2]) → listaf2
5. Append(Take[lista5, 1, m], Element[listater, 3]) → listaf3
6. Append(Take[lista6, 1, m], Element[listater, 4]) → listaf4
7. Take({a_1, a_8, a_{15}, a_{22}, a_{29}, a_{36}}, 1, n) → listac1
8. Take({"f_1", "f_2", "f_3", "f_4", "f_5", "f_6"}, 1, n) → lista3
9. IndexOf(f, listac1) → h
10. CountIf(t ≟ f, t, listac1) → e
11. Sequence((f(x) * i / i), i, 1, e) → lista4
12. Sequence(Take[lista4, 1, i], i, 1, e - 1) → lista9
13. Sequence(IndexOf[f, Remove[listac1, Element[lista9, i]]], i, 1, e - 1) → lista10
14. Sequence(Element[lista10, i] + i, i, 1, e - 1) → lista11
15. Join({{h}, lista11}) → lista13
16. Remove(Sequence[i, i, 1, n], lista13) → lista14
17. Remove(Sequence[i, i, 1, n], {Element[lista14, 1], Element[lista13, 1]}) → lista15
18. Insert(Element[lista14, 1], lista15, 1) → lista16
19. If(Element[listac1, 1] ≟ f, Insert[Element[lista13, 1], lista16, Element[lista14, 1]], Sequence[i, i, 1, n]) → lista17
20. Sort(Take[{listaf1, listaf2, listaf3, listaf4, listaf5, listaf6}, 1, n], lista17) → matriz1
21. Sequence(Sequence[Expand[((-Element[lista20, i, 1]) * Element[lista20, 1, j]) + (Element[lista20, 1, 1] * Element[lista20, i, j])], j, 1, m + 1], i, 2, n) → matriz2
22. Insert({Element[lista20, 1]}, matriz2, 1) → lista21
23. Sequence(Element[lista21, i, 2], i, 2, n) → lista23
24. IndexOf(f, lista23) → i
25. CountIf(t ≟ f, t, Sequence[Element[lista21, i, 2], i, 2, n]) → e_1
26. Sequence(Take[Sequence[(f(x) * j / j), j, 1, e_1], 1, i], i, 1, e_1 - 1) → lista24
27. Sequence(IndexOf[f, Remove[lista23, Element[lista24, i]]], i, 1, e_1 - 1) → lista25
28. Sequence(Element[lista25, i] + i, i, 1, e_1 - 1) → lista26
29. Join({{i}, lista26}) → lista27
30. Remove(Sequence[i, i, 1, n - 1], lista27) → lista28
31. Remove(Sequence[i, i, 1, n - 1], {Element[lista28, 1], Element[lista27, 1]}) → lista29
32. Insert(Element[lista28, 1], lista29, 1) → lista30
33. If(Element[lista23, 1] ≟ f, If[Length[lista27] ≟ n - 1, Sequence[i, i, 1, n - 1], Insert[Element[lista27, 1], lista30, Element[lista28, 1]]], Sequence[i, i, 1, n - 1]) → lista32
34. If(n ≤ 1, lista21, Insert[{Element[lista21, 1]}, Sort[Sequence[Element[lista21, i], i, 2, n], lista32], 1]) → lista33
35. If(Element[lista33, 2, 2] ≟ f, lista33, lista35) → matriz3
36. Sequence(If[Element[matriz3, i, 2] ≟ f, Element[matriz3, i], Sequence[Expand[((-Element[matriz3, i, 2]) * Element[matriz3, 2, j]) + (Element[matriz3, 2, 2] * Element[matriz3, i, j])], j, 1, m + 1]], i, 3, n) → matriz4
37. Sequence(Element[matriz4, i, 3], i, 1, n - 2) → lista36
38. IndexOf(f, lista36) → r
39. CountIf(t ≟ f, t, Sequence[Element[matriz4, i, 3], i, 1, n - 2]) → o
40. Sequence(Take[Sequence[(f(x) * j / j), j, 1, o], 1, i], i, 1, o - 1) → matriz5
41. Sequence(IndexOf[f, Remove[lista36, Element[matriz5, i]]], i, 1, o - 1) → lista37
42. Sequence(Element[lista37, i] + i, i, 1, o - 1) → lista38
43. Join({{r}, lista38}) → lista39
44. Remove(Sequence[i, i, 1, n - 2], lista39) → lista40
45. Remove(Sequence[i, i, 1, n - 2], {Element[lista40, 1], Element[lista39, 1]}) → lista41
46. Insert(Element[lista40, 1], lista41, 1) → lista42
47. If(Element[lista36, 1] ≟ f, If[Length[lista39] ≟ n - 2, Sequence[i, i, 1, n - 2], Insert[Element[lista39, 1], lista42, Element[lista40, 1]]], Sequence[i, i, 1, n - 2]) → lista43
48. If(n ≤ 2, matriz3, Insert[Take[matriz3, 1, 2], Sort[Sequence[Element[matriz4, i], i, 1, n - 2], lista43], 1]) → matriz6
49. Sequence(If[Element[lista44, i, 3] ≟ f, Element[lista44, i], Sequence[Expand[((-Element[lista44, i, 3]) * Element[lista44, 3, j]) + (Element[lista44, 3, 3] * Element[lista44, i, j])], j, 1, m + 1]], i, 4, n) → matriz7
50. If(n ≤ 2, matriz3, Insert[Take[lista44, 1, 3], matriz7, 1]) → matriz8
51. CountIf(t ≟ f, t, Sequence[Element[matriz8, i, 4], i, 4, n]) → u
52. Sequence(Take[Sequence[(f(x) * j / j), j, 1, u], 1, i], i, 1, u - 1) → lista46
53. Sequence(Element[matriz8, i, 4], i, 4, n) → lista45
54. Sequence(IndexOf[f, Remove[lista45, Element[lista46, i]]], i, 1, u - 1) → lista47
55. Sequence(Element[lista47, i] + i, i, 1, u - 1) → lista48
56. IndexOf(f, lista45) → v
57. Join({{v}, lista48}) → lista49
58. Remove(Sequence[i, i, 1, n - 3], lista49) → lista50
59. Remove(Sequence[i, i, 1, n - 3], {Element[lista50, 1], Element[lista49, 1]}) → lista51
60. Insert(Element[lista50, 1], lista51, 1) → lista52
61. If(Element[lista45, 1] ≟ f, If[Length[lista49] ≟ n - 3, Sequence[i, i, 1, n - 3], Insert[Element[lista49, 1], lista52, Element[lista50, 1]]], Sequence[i, i, 1, n - 3]) → lista53
62. Join({{1, 2, 3}, lista53 + 3}) → lista58
63. If(n ≤ 2, matriz3, Sort[matriz8, lista58]) → matriz9
64. RemoveUndefined(If[Element[lista54, 4, 4] ≟ f ∨ n ≤ 4, lista54, Join[{Take[lista54, 1, 4], {Sequence[Expand[((-Element[lista54, 4, i]) * Element[lista54, 5, 4]) + (Element[lista54, 4, 4] * Element[lista54, 5, i])], i, 1, m + 1]}, If[n ≟ 6, {Sequence[Expand[((-Element[lista54, 4, i]) * Element[lista54, 6, 4]) + (Element[lista54, 4, 4] * Element[lista54, 6, i])], i, 1, m + 1]}]}]]) → lista56
65. RemoveUndefined(If[Element[lista56, 5, 5] ≟ f, Join[{Take[lista56, 1, 4], Reverse[Take[lista56, 5, 6]]}], lista56]) → lista57
66. Sequence(If[Element[lista57, i, 5] ≟ f, " ", ((((((Expand[(-Element[lista57, i, 5])] * Element[lista3, 5]) * "+") * "(") * Element[lista57, 5, 5]) * ")") * Element[lista3, i])], i, 6, n) → lista61
67. Sequence(If[Element[lista54, i, 4] ≟ f, " ", ((((((Expand[(-Element[lista54, i, 4])] * Element[lista3, 4]) * "+") * "(") * Element[lista54, 4, 4]) * ")") * Element[lista3, i])], i, 5, n) → lista60
68. If(m ≥ n, n, m) → d
69. If(n ≤ 5, lista57, Join[{Take[lista57, 1, 5], {Sequence[Expand[((-Element[lista57, 5, i]) * Element[lista57, 6, 5]) + (Element[lista57, 5, 5] * Element[lista57, 6, i])], i, 1, m + 1]}}]) → matriz10
70. Element(listac1, Element[lista14, 1]) → p
71. Append(Sequence[Expand[Element[lista1, i] / a_1(x)], i, 1, m], Expand[Element[listater, 1] / a_1(x)]) → listaf12
72. Element(lista3, Element[lista13, 1]) → texto38
73. Element(lista3, Element[lista14, 1]) → texto39
74. Textfield(a_7) → c_{11}
75. Textfield(a_{14}) → c_{12}
76. Textfield(a_{21}) → c_{13}
77. Textfield(a_{28}) → c_{14}
78. Textfield(a_{35}) → c_{15}
79. Textfield(a_{42}) → c_{16}
80. Textfield(a_7) → c_{21}
81. Textfield(a_{14}) → c_{22}
82. Textfield(a_{21}) → c_{23}
83. Textfield(a_{28}) → c_{24}
84. Textfield(a_{35}) → c_{25}
85. Textfield(a_{42}) → c_{26}
86. Textfield(a_7) → c_{31}
87. Textfield(a_{14}) → c_{32}
88. Textfield(a_{21}) → c_{33}
89. Textfield(a_{28}) → c_{34}
90. Textfield(a_{35}) → c_{35}
91. Textfield(a_{42}) → c_{36}
92. Textfield(a_7) → c_{41}
93. Textfield(a_{14}) → c_{42}
94. Textfield(a_{21}) → c_{43}
95. Textfield(a_{28}) → c_{44}
96. Textfield(a_{35}) → c_{45}
97. Textfield(a_{42}) → c_{46}
98. Textfield(a_7) → c_{51}
99. Textfield(a_{14}) → c_{52}
100. Textfield(a_{21}) → c_{53}
101. Textfield(a_{28}) → c_{54}
102. Textfield(a_{35}) → c_{55}
103. Textfield(a_{42}) → c_{56}
104. Textfield(a_1) → a_{73}
105. Textfield(a_2) → a_{74}
106. Textfield(a_3) → a_{77}
107. Textfield(a_4) → a_{47}
108. Textfield(a_5) → a_{75}
109. Textfield(a_6) → a_{48}
110. Textfield(a_8) → a_{49}
111. Textfield(a_9) → a_{76}
112. Textfield(a_{10}) → a_{67}
113. Textfield(a_{11}) → a_{68}
114. Textfield(a_{12}) → a_{69}
115. Textfield(a_{13}) → a_{70}
116. Textfield(a_{15}) → a_{50}
117. Textfield(a_{16}) → a_{57}
118. Textfield(a_{17}) → a_{58}
119. Textfield(a_{18}) → a_{59}
120. Textfield(a_{19}) → a_{60}
121. Textfield(a_{20}) → a_{78}
122. Textfield(a_{22}) → a_{71}
123. Textfield(a_{23}) → a_{72}
124. Textfield(a_{24}) → a_{43}
125. Textfield(a_{25}) → a_{44}
126. Textfield(a_{26}) → a_{45}
127. Textfield(a_{27}) → a_{46}
128. Textfield(a_{29}) → a_{51}
129. Textfield(a_{30}) → a_{52}
130. Textfield(a_{31}) → a_{53}
131. Textfield(a_{32}) → a_{54}
132. Textfield(a_{33}) → a_{55}
133. Textfield(a_{34}) → a_{56}
134. Textfield(a_{36}) → a_{61}
135. Textfield(a_{37}) → a_{62}
136. Textfield(a_{38}) → a_{63}
137. Textfield(a_{39}) → a_{64}
138. Textfield(a_{40}) → a_{65}
139. Textfield(a_{41}) → a_{66}
140. Take({a_2, a_9, a_{16}, a_{23}, a_{30}, a_{37}}, 1, n) → listac2
141. Take({a_3, a_{10}, a_{17}, a_{24}, a_{31}, a_{38}}, 1, n) → listac3
142. Take({a_4, a_{11}, a_{18}, a_{25}, a_{32}, a_{39}}, 1, n) → listac4
143. Take({a_5, a_{12}, a_{19}, a_{26}, a_{33}, a_{40}}, 1, n) → listac5
144. Take({a_6, a_{13}, a_{20}, a_{27}, a_{34}, a_{41}}, 1, n) → listac6
145. IndexOf(f, listac1) → g
146. Remove(listac1, {f, f}) → lista12
147. Element(lista3, 1) → texto41
148. TableText(Take[{listaf1, listaf2, listaf3, listaf4, listaf5, listaf6}, 1, n], If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → matriz1_1
149. TableText(lista20, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → lista18
150. TableText(lista21, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto44
151. Sequence(If[Element[lista20, i, 1] ≟ f, " ", ((((((Expand[(-Element[lista20, i, 1])] * Element[lista3, 1]) * "+") * "(") * Element[lista20, 1, 1]) * ")") * Element[lista3, i])], i, 2, n) → lista22
152. TableText(matriz3, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto47
153. Element(lista33, 2, 2) → q
154. TableText({lista22}, "cv") → texto49
155. If(k > l ∧ k > 2, -1, If[k < l ∧ k ≥ 2, 1, 0]) → j
156. Element(lista3, Element[lista28, 1] + 1) → texto52
157. If(Element[lista21, 2, 2] ≟ f, texto53, " ") → texto50
158. Sequence(If[Element[matriz3, i, 2] ≟ f, " ", ((((((Expand[(-Element[matriz3, i, 2])] * Element[lista3, 2]) * "+") * "(") * Element[matriz3, 2, 2]) * ")") * Element[lista3, i])], i, 3, n) → lista31
159. TableText({lista31}, "cv") → texto55
160. Insert(Take[matriz3, 1, 2], matriz4, 1) → lista34
161. TableText(lista34, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto57
162. Element(lista33, 2, 2) → s
163. Element(matriz6, 3, 3) → t
164. Element(lista3, Element[lista40, 1] + 2) → texto61
165. If(Element[lista21, 2, 2] ≟ f, texto53, texto48) → texto63
166. If(Element[matriz4, 1, 3] ≟ f, texto62, " ") → texto64
167. Element(lista3, Element[lista40, 1] + 2) → texto65
168. Sequence(If[Element[lista44, i, 3] ≟ f, " ", ((((((Expand[(-Element[lista44, i, 3])] * Element[lista3, 3]) * "+") * "(") * Element[lista44, 3, 3]) * ")") * Element[lista3, i])], i, 4, n) → lista55
169. TableText({lista55}, "cv") → texto71
170. TableText(lista44, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto67
171. TableText(matriz8, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto58
172. TableText(lista54, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto68
173. Element(matriz8, Element[lista50, 1] + 3, 4) → f_1
174. Element(lista3, Element[lista50, 1] + 3) → texto73
175. If(Element[matriz8, 4, 4] ≟ f, texto74, " ") → texto75
176. TableText(lista56, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto77
177. TableText({lista60}, "cv") → texto79
178. Element(lista56, 5, 5) → p_1
179. Element(lista56, 6, 5) → q_1
180. If(p_1 ≟ f, If[q_1 ≟ f, " ", texto83], " ") → texto85
181. TableText(matriz10, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto87
182. Element(lista57, 6, 5) → r_1
183. TableText({lista61}, "cv") → texto89
184. TableText(lista57, If[m ≟ 6, "c() |00000010", If[m ≟ 5, "c() |0000010", If[m ≟ 4, "c() |000010", If[m ≟ 3, "c() |00010", If[m ≟ 2, "c() |0010", "c() |010"]]]]]) → texto81
185. LaTeX($6) → texto92
186. LaTeX($5) → texto93
187. LaTeX($4) → texto94
188. LaTeX($3) → texto95
189. LaTeX($2) → texto96
190. LaTeX($1) → texto97
191. If(n ≟ 1, 0, If[n ≟ 2, 3, If[n ≟ 3, 5, If[n ≟ 4, 7, If[n ≟ 5, 9, 11]]]]) → b_1
192. Distance(E_1, F_1) → distanciaE1F1
193. Textfield(m) → CasillaDeEntrada1
194. Textfield(n) → CasillaDeEntrada2
195. If(Element[listac1, 1] ≟ f, texto40, " ") → texto42
196. Sequence(Sequence[Element[matriz1, i, j], j, 1, m], i, 1, n) → matriz11
197. LaTeX($8) → texto43
198. LaTeX($8) → texto60
199. MatrixRank(matriz1) → c_1
200. TableText({{"Valores x", "Rango A", "Rango A'", "Nº de incógnitas", "Tipo de solución"}, {x ≠ LaTeX[$8], LaTeX[$14], LaTeX[$13], m, LaTeX[$15]}, {("x=" * LaTeX[$8]), LaTeX[$11], LaTeX[$10], m, LaTeX[$12]}}, "vc|1111_111111") → texto1
201. If(m ≟ 6, 180, If[m ≟ 5, 205, If[m ≟ 4, 215, If[m ≟ 3, 280, If[m ≟ 2, 315]]]]) → w