Podélný profil křivky na topografické ploše
Author: Radka Hamříková

150

180

210

240

k_1

1_1

2_1

3_1

4_1

5_1

6_1

7_1

8_1

°1_1

°2_1

°3_1

°4_1

°5_1

°6_1

°7_1

°8_1

°1

°2

°3

°4

°5

°6

°7

°8

°k

A = (-4.3, -4.820000000000002)
B = (12.200000000000001, -4.820000000000002)
C = (2.9, -1.28)
D = (3.16, 0.34)
E = (3.46, 1.62)
c = CircumcircleArc(C, D, E)
F = (3.66, 2.4)
G = (4.18, 3.54)
d = CircumcircleArc(E, F, G)
H = (5.04, 4.52)
I = (6.38, 5.26)
e = CircumcircleArc(G, H, I)
J = Point(c)
K = Point(c)
L = Point(d)
M = Point(d)
N = Point(d)
O = Point(e)
P = Point(e)
Q = Point(e)
R = Point(a)
b = Segment(J, K)
S = Point(Circle[R, b])
f = Segment(R, S)
g = Segment(K, L)
T = Point(Circle[S, g])
h = Segment(S, T)
i = Segment(L, M)
U = Point(Circle[T, i])
j = Segment(T, U)
k = Segment(M, N)
V = Point(Circle[U, k])
l = Segment(U, V)
m = Segment(N, O)
W = Point(Circle[V, m])
n = Segment(V, W)
p = Segment(O, P)
Z = Point(Circle[W, p])
q = Segment(W, Z)
r = Segment(P, Q)
A_1 = Point(Circle[Z, r])
s = Segment(Z, A_1)
t = OrthogonalLine(R, a)
a_1 = OrthogonalLine(S, f)
b_1 = OrthogonalLine(T, h)
c_1 = OrthogonalLine(U, j)
d_1 = OrthogonalLine(U, n)
e_1 = OrthogonalLine(V, n)
f_1 = OrthogonalLine(W, q)
g_1 = OrthogonalLine(Z, q)
h_1 = OrthogonalLine(A_1, a)
k_1 = Circle(R, 1.5)
B_1, C_1 = Intersect(k_1, t)
p_1 = Circle(S, 1.8)
D_1, E_1 = Intersect(p_1, a_1)
q_1 = Circle(T, 2.1)
F_1, G_1 = Intersect(q_1, b_1)
r_1 = Circle(U, 2.4)
H_1 = Intersect(c_1, d_1)
I_1 = Intersect(r_1, c_1, 2)
s_1 = Circle(V, 2.4)
J_1, K_1 = Intersect(s_1, e_1)
t_1 = Circle(W, 2.1)
L_1, M_1 = Intersect(t_1, f_1)
c_2 = Circle(Z, 1.8)
N_1, O_1 = Intersect(c_2, g_1)
d_2 = Circle(A_1, 1.5)
P_1, Q_1 = Intersect(d_2, h_1)
e_2 = CircumcircleArc(O_1, M_1, K_1)
h_2 = CircumcircleArc(E_1, G_1, I_1)
i_1 = Segment(C_1, E_1)
j_1 = Segment(O_1, Q_1)
R_1 = (1.18, -2.9)
f_2 = CircleArc(R_1, K_1, I_1)