radio

Auxiliares

Jambas

all

Arco de medio punto

luz = 7 (slider from 0 to 10)
radio: luz / 2
Q: (radio, 0, 0)
α = 0 rad (slider from 0° to 90°, step 0.017453292519943295)
pizca: 0.001
u: (0, 0, (-2 * radio))
P: ((radio * cos(α - pizca)), 0, (radio * sin(α - pizca)))
P' = Mirror(P, zAxis)
angmax: 179.9°
O: (0, 0, 0)
c = CircleArc(O, Q, P)
f = Segment(O, P)
a = true
b = false
PP: P + u
QQ: Q + u
d = If(α ≟ 90°, true, false)
c' = Mirror(c, zAxis)
O' = Mirror(O, zAxis)
Q' = Mirror(Q, zAxis)
QQ': Q' + u
g = Segment(Q, QQ)
h = Segment(Q', QQ')
vimposta: (0.5, 0, 0)
QD: Q + vimposta
QI: Q - vimposta
j = Segment(QD, QI)
QD' = Mirror(QD, zAxis)
QI' = Mirror(QI, zAxis)
j' = Segment(QD', QI')
k = Segment(Q, Q')
p = OrthogonalPlane(QQ, zAxis)