\mbox{Cuadrícula de }15\times15

\mbox{Suelo de }120\times120	

\mbox{Rectángulo de apoyo (}90\times100\mbox{)}	

\mbox{Cotas en cm}

suelo

soporte

caras ext

caras int

antitimpanos

tirantes

varios

cm2

gramaje

kg

ref suelo

tol = 2.5 (slider from 0 to 5, step 0.5)
B: (15 - tol, 45 + tol)
C: (15 - tol, 15 - tol)
D: (45 + tol, 15 - tol)
f: x = 50
h: y = 45
espesor = 5 (slider from 4 to 8, step 1)
a: z = 0
b: z = (2 * espesor / 10)
c: z = 18
d: z = 18 - espesor / 10
j, k = offsetline(f, espesor / 10)
g, i = offsetline(h, espesor / 10)
aa = 4.8 (slider from -5 to 5, step 0.1)
l, m = offsetline(h, aa)
n, p = offsetline(f, aa)
q, r = offsetline(m, espesor / 10)
s, t = offsetline(p, espesor / 10)
E = Intersect(i, s)
F = Intersect(k, i)
G = Intersect(k, q)
H = Intersect(q, s)
baseinterior, e, f_1, g_1, h_1 = Polygon(E, F, G, H)
I = Intersect(f, h)
J = Intersect(f, m)
K = Intersect(m, p)
L = Intersect(h, p)
baseexterior, i_1, j_1, k_1, l_1 = Polygon(I, J, K, L)
m_1 = OrthogonalLine(J, b)
n_1 = OrthogonalLine(I, b)
p_1 = OrthogonalLine(K, b)
M = Intersect(p_1, b)
O = Intersect(n_1, b)
P = Intersect(m_1, b)
r_1 = OrthogonalLine(C, d)
s_1 = OrthogonalLine(D, d)
t_1 = OrthogonalLine(B, d)
A: (45 + tol, 45 + tol)
a_1 = OrthogonalLine(A, d)
N = Intersect(s_1, d)
Q = Intersect(r_1, d)
R = Intersect(a_1, d)
S = Intersect(t_1, d)
basesup, n_2, r_2, s_2, q_1 = Polygon(N, R, S, Q)
b_1 = OrthogonalLine(L, b)
T = Intersect(b_1, b)
baseinf, m_2, t_2, o, p_2 = Polygon(M, T, O, P)
cara1, n_3, p_3, o_1, r_3 = Polygon(N, P, O, R)
cara2, r_4, s_3, t_3, o_2 = Polygon(R, S, T, O)
cara3, s_4, q_2, m_3, t_4 = Polygon(S, Q, M, T)
cara4, q_3, n_4, p_4, m_4 = Polygon(Q, N, P, M)
distanceQM = Distance(Q, M)
distanceNP = Distance(N, P)
distanceQP = Distance(Q, P)
distanceQN = Distance(Q, N)
U: (0, 0, 0)
I' = Mirror(I, U)
J' = Mirror(J, U)
K' = Mirror(K, U)
L' = Mirror(L, U)
baseexterior', i', j', k', l' = Polygon(I', J', K', L')
I'_1 = Mirror(I, yAxis)
J'_1 = Mirror(J, yAxis)
K'_1 = Mirror(K, yAxis)
L'_1 = Mirror(L, yAxis)
baseexterior'_1, i'_1, j'_1, k'_1, l'_1 = Polygon(I'_1, J'_1, K'_1, L'_1)
I'_2 = Mirror(I, xAxis)
J'_2 = Mirror(J, xAxis)
K'_2 = Mirror(K, xAxis)
L'_2 = Mirror(L, xAxis)
baseexterior'_2, i'_2, j'_2, k'_2, l'_2 = Polygon(I'_2, J'_2, K'_2, L'_2)
rapoyo, i_2, i'_3, i'_4, i'_5 = Polygon(I, I'_2, I', I'_1)
V = (-60, 60, 0)
W = (60, 60, 0)
Y = (60, -60, 0)
X = (-60, -60, 0)
poly1, v, w, z_1, a_2 = Polygon(V, W, Y, X)
z18 = Vector((0, 0, 18))
suelocs = Translate(poly1, z18)
u: x = 0
c_1: y = 0
cara3' = Mirror(cara3, u)
cara2' = Mirror(cara2, u)
cara4' = Mirror(cara4, u)
cara1' = Mirror(cara1, u)
cara1'_1 = Mirror(cara1, c_1)
cara2'_1 = Mirror(cara2, c_1)
cara4'_1 = Mirror(cara4, c_1)
cara3'_1 = Mirror(cara3, c_1)
cara4'' = Mirror(cara4', c_1)
cara1'' = Mirror(cara1', c_1)
cara2'' = Mirror(cara2', c_1)
cara3'' = Mirror(cara3', c_1)
S' = Mirror(S, u)
T' = Mirror(T, u)
T'_1 = Mirror(T, u)
Q' = Mirror(Q, u)
M' = Mirror(M, u)
d_1 = Line(T, S')
e_1 = Line(S, T')
A_1 = (45, 45)
B_1 = (15, 45)
C_1 = (45, 15)
D_1 = (15, 15)
f_2 = OrthogonalLine(B_1, d)
g_2 = OrthogonalLine(D_1, d)
h_2 = OrthogonalLine(C_1, d)
j_2 = OrthogonalLine(A_1, d)
E_1 = Intersect(g_2, d)
F_1 = Intersect(h_2, d)
G_1 = Intersect(f_2, d)
H_1 = Intersect(j_2, d)
I_1 = Mirror(G_1, u)
l_2 = Line(G_1, T')
k_2 = Line(T, I_1)
Z = Intersect(k_2, l_2)
b_2 = Line(G_1, I_1)
J_1 = Intersect(s_4, b_2)
K_1 = Mirror(J_1, u)
antitxm, t_5, j_3, k_3, t', z_2 = Polygon(T, J_1, K_1, T', Z)
c_2 = OrthogonalLine(Z, c_1)
L_1 = Intersect(s_3, t_5)
u_1 = Plane(T, S, S')
M_1 = Intersect(c_2, u_1)
antitxs, t_6, s_5, s', t'_1, m_5 = Polygon(T, S, S', T', M_1)
antitxb, z_3, t_7, m_6 = Polygon(T, M_1, Z)
antitxb' = Mirror(antitxb, u)
N_1 = Midpoint(r_3)
O_1 = Midpoint(q_3)
P_1 = Midpoint(s_4)
Q_1 = Midpoint(r_4)
R_1 = Midpoint(p_3)
S_1 = Midpoint(p_4)
T_1 = Midpoint(m_3)
U_1 = Midpoint(t_3)
carar1, r_5, n_5, p_5, t_8 = Polygon(R_1, N_1, P_1, T_1)
V_1 = Midpoint(t_8)
W_1 = Midpoint(n_5)
carar2, u_2, v_1, w_1, q_4 = Polygon(U_1, V_1, W_1, Q_1)
Z_1 = Intersect(v_1, t_8)
distanceQz2 = Distance(Q, z_2)
carar3, v_2, s_6, o_3, w_2 = Polygon(V_1, S_1, O_1, W_1)
B_2 = Mirror(E_1, c_1)
C_2 = Mirror(B_2, u)
M'_1 = Mirror(M, c_1)
A_2 = Mirror(M'_1, u)
distanceQ'Q = Distance(Q', Q)
distanceE1B2 = Distance(E_1, B_2)
distanceC2B2 = Distance(C_2, B_2)
Q'' = Mirror(Q', c_1)
a_3 = Plane(Q, Q'', U)
d_2: z = 18 - (2 * espesor / 10)
e_2 = OrthogonalLine(N, a)
D_2 = Intersect(e_2, b)
b_3 = Plane(D_2, N, R)
f_3 = IntersectPath(b_3, b)
E_2 = Intersect(f_3, p_4)
F_2 = Mirror(E_2, c_1)
N' = Mirror(N, c_1)
g_3 = Line(N', E_2)
h_3 = Line(F_2, N)
G_2 = Intersect(g_3, h_3)
H_2 = Intersect(p_4, p_3)
I_2 = Mirror(H_2, c_1)
i_3 = OrthogonalLine(G_2, u)
l_3 = Line(I_2, N)
J_2 = Intersect(l_3, i_3)
antitys, f_4, n', n_6, e_3, g_4 = Polygon(F_2, N', N, E_2, G_2)
antitym, i_4, n'_1, n_7, h_4, j_4 = Polygon(I_2, N', N, H_2, J_2)
antityb, f_5, g_5, j_5, i_5 = Polygon(F_2, G_2, J_2, I_2)
antitxm' = Mirror(antitxm, c_1)
antitxs' = Mirror(antitxs, c_1)
antitxb'_1 = Mirror(antitxb, c_1)
antitxb'' = Mirror(antitxb', c_1)
antitym' = Mirror(antitym, u)
antitys' = Mirror(antitys, u)
antityb' = Mirror(antityb, c_1)
antityb'_1 = Mirror(antityb, u)
antityb'' = Mirror(antityb', u)
B1: 14400
B4: 339.063710827331
C4: 342.118400557468
D4: 756.311945165486
E4: 666.518295622859
B5: 423.519918775965
C5: 246.073810877956
D5: 246.073810877956
B7: 383.830564784053
C7: 390.123288499673
B8: 353.048082943942
C8: 350.48275862069
D7: 51.8525319137047
E7: 51.8525319137047
D8: 52.7838158540485
E8: 52.7838158540485
G4: 4
G5: 4
G7: 2
G8: 2
F4 = Sum(B4:E4)
H4: (F4 * G4)
F5 = Sum(B5:D5)
H5: (F5 * G5)
F7 = Sum(B7:E7)
H7: (F7 * 2)
F8 = Sum(B8:E8)
H8: (F8 * 2)
H1: B1
H14 = Sum(H1:H11)
F15: 560
H15: (F15 * H14 / 10000 / 1000)
I1: ($F$15 * H1 / 10000000)
I4: ($F$15 * H4 / 10000000)
I5: ($F$15 * H5 / 10000000)
I7: ($F$15 * H7 / 10000000)
I8: ($F$15 * H8 / 10000000)
I12 = NaN
I14 = Sum(I1:I11)
B3 = NaN
D3 = NaN
E5 = NaN
B2: ((30 * 30) * 5)
H2: B2
I2: ($F$15 * H2 / 10000000)
pesototal: H15
α = Angle(P, M, Q)
K_2 = Intersect(q_3, n_4)
c_3 = OrthogonalLine(K_2, m_4, space)
L_2 = Intersect(m_4, c_3)
distanceK2L2 = Distance(K_2, L_2)
TextK2L2: Name[K_2] + (Name[L_2]) + " = " + distanceK2L2
β = Angle(N, Q, M)
d_3 = OrthogonalLine(L_2, cara4)
cara4'_2 = Rotate(cara4, (-(45°)), d_3)
M_2 = PointIn(cara4'_2)
N_2 = PointIn(cara4'_2)
O_2 = PointIn(cara4'_2)
P_2 = PointIn(cara4'_2)
k_4 = Line(P_2, O_2)
l_4 = OrthogonalLine(N_2, k_4, cara4'_2)
Q_2 = Intersect(k_4, l_4)
distanceQ2O2 = Distance(Q_2, O_2)
TextQ2O2: Name[Q_2] + (Name[O_2]) + " = " + distanceQ2O2
γ = Angle(N, P, M)
δ = Angle(N_2, P_2, O_2, cara4'_2)
ε = Angle(O_2, P_2, N_2, cara4'_2)
ladocabeza: 30 + (2 * tol)
ladopiemm: (aa * 10)
text3: "\mbox{Soporte: cabeza de }" + (LaTeX[ladocabeza]) + "\times " + (LaTeX[ladocabeza]) + "\mbox{; pie de }" + (LaTeX[ladopiemm]) + "\times " + (LaTeX[ladopiemm]) + "\mbox{ mm}^2"

Tool: offsetline
select line, input distance
Input: g, o
Output: j, k

G = Point(g)
v = Direction(g)
H: G + v
h = Circle(H, o)
i = OrthogonalLine(H, g)
I, J = Intersect(h, i)
j = Line(J, g)
k = Line(I, g)