max_area: min_angle: Split a Path into the single-line paths that it consists of, but check the return type...
$($(String(name))): $(@bind $(name) $(esc(ex)))
""")
end
endmetadatashow_logsèdisabled®skip_as_script«code_folded$ba23cd4b-9c51-4b3b-888f-e170fd4edbddcell_id$ba23cd4b-9c51-4b3b-888f-e170fd4edbddcodeusing BenchmarkToolsmetadatashow_logsèdisabled®skip_as_script«code_folded$84da64fc-a35e-45bf-bcdc-83a7f163621bcell_id$84da64fc-a35e-45bf-bcdc-83a7f163621bcoderesult .|> length |> summetadatashow_logsèdisabled®skip_as_script«code_folded$798f75b7-cfb9-4bf3-bb0c-9a8d063d1c9ccell_id$798f75b7-cfb9-4bf3-bb0c-9a8d063d1c9ccode.random_subset(xs) = xs[rand(Bool, length(xs))]metadatashow_logsèdisabled®skip_as_script«code_folded$8407ef41-63ed-4cf6-a069-33010f1914cbcell_id$8407ef41-63ed-4cf6-a069-33010f1914cbcodeE"Split a `Path` into the single-line paths that it consists of, but check the return type..."
split_lines(p::Path)::Vector{Tuple{Point,Point}} = [
# Use `extrema` to "sort" the two points (which just works apparently!). This will canonalize the result.
extrema((p.points[i], p.points[i+1]))
for i in 1:length(p.points)-1
]metadatashow_logsèdisabled®skip_as_script«code_folded$28162e97-0166-45d4-b07d-0ecf228e9707cell_id$28162e97-0166-45d4-b07d-0ecf228e9707codefunction fill_with_pattern(triangle_corners; step::Real=1.5, direction)
a, b, c = triangle_corners
AB = b - a
AC = c - a
BC = c - b
crossAB = rotate_90(AB)
z1, z2 = dot(rotate_90(direction), AC), dot(rotate_90(direction), BC)
# @info "asdf" z1 z2
# if z1 == 0
# if
# return fill_with_pattern((b,c,a); step, direction)
# end
# if z2 == 0
# # that's fine
# end
if z1 < 0
return fill_with_pattern((c,b,a); step, direction)
end
if z2 > 0
return fill_with_pattern((a,c,b); step, direction)
end
# direction = @something(direction, crossAB)
# if dot(AB,AC) < 0
# return fill_with_pattern((b,a,c))
# end
# if dot(-AB,BC) < 0
# return fill_with_pattern((a,c,b))
# end
ABlength = norm(AB)
AClength = norm(AC)
BClength = norm(BC)
direction *= ABlength / norm(direction)
step_AB = step / abs(dot(crossAB,direction)) * ABlength
map(step_AB/2:step_AB:1) do x
s = a + x * AB
yAC = x * dot(AC,crossAB) / dot(direction,rotate_90(AC))
yBC = -(1-x) * dot(BC,crossAB) / dot(direction,rotate_90(BC))
eAC = s + (
z1 == 0 ? yBC :
z2 == 0 ? yAC :
minabs(yAC, yBC)
) * direction
# eAC = s + yAC * direction
Path([s,eAC])
end
endmetadatashow_logsèdisabled®skip_as_script«code_folded$42b04181-4784-4906-b869-dea036f1afb7cell_id$42b04181-4784-4906-b869-dea036f1afb7codeusing CoordinateTransformationsmetadatashow_logsèdisabled®skip_as_script«code_folded$abe6e1b4-ccf0-4abd-81c5-4f0b0df7fe94cell_id$abe6e1b4-ccf0-4abd-81c5-4f0b0df7fe94code(flatmap(args...) = vcat(map(args...)...)metadatashow_logsèdisabled®skip_as_script«code_folded$90c00e90-13ba-4b32-a85c-d6fd5394164bcell_id$90c00e90-13ba-4b32-a85c-d6fd5394164bcode6rotate_90(p::SVector{2,<:Real}) = SVector(-p[2], p[1])metadatashow_logsèdisabled®skip_as_script«code_folded$976d9aa3-bf54-4630-980b-bfa063a56819cell_id$976d9aa3-bf54-4630-980b-bfa063a56819codefunction triangulate_raw(ps::AbstractVector{<:SVector}; switches::String="Q")
mat = to_triangulate_mat(ps)
triin=Triangulate.TriangulateIO()
triin.pointlist=mat
Triangulate.triangulate(switches, triin)
endmetadatashow_logsèdisabled®skip_as_script«code_folded$e9010ab3-cdb4-49f9-b2c3-705437ea5ebfcell_id$e9010ab3-cdb4-49f9-b2c3-705437ea5ebfcode!points = [
0.0 0
1.0 0
0.0 1
]metadatashow_logsèdisabled®skip_as_script«code_folded$cff314d6-7e2d-42d7-b4ab-30b76cac82bccell_id$cff314d6-7e2d-42d7-b4ab-30b76cac82bccode'reinterpret(10, SVector{Float64,2}, aa)metadatashow_logsèdisabled®skip_as_script«code_folded$83fee9f6-106a-4ca7-b93f-15b9038cde8bcell_id$83fee9f6-106a-4ca7-b93f-15b9038cde8bcodeټfunction triangulate(args...; kwargs...)
t, v = triangulate_raw(args...; kwargs...)
z = t.trianglelist
[
SVector{4,Int}(z[1,j], z[2,j], z[3,j], z[1,j] )
for j in 1:size(z,2)
]
endmetadatashow_logsèdisabled®skip_as_script«code_folded$2874c51f-bdee-4070-b129-a40d5f674a1acell_id$2874c51f-bdee-4070-b129-a40d5f674a1acode}[
[
Path(xx[t])
for t in triangulate(xx; switches="Q")
]...,
[
Path(small_dot.points .+ (x,))
for x in xx
]...,
]metadatashow_logsèdisabled®skip_as_script«code_folded$ce02fd38-a690-426e-a10e-e768fc222981cell_id$ce02fd38-a690-426e-a10e-e768fc222981code'xx = 30 .* randn(SVector{2,Float64},10)metadatashow_logsèdisabled®skip_as_script«code_folded$d1820c35-6acd-41fd-9138-ca37bdbb8126cell_id$d1820c35-6acd-41fd-9138-ca37bdbb8126coderesult = let
pl, tl = triangulate_true(xx; max_area, min_angle)
[
without_duplicate_lines([
Path(pl[t])
for t in tl
])...,
# [
# Path(200 .* (degree_rotation(rand(0:359)),) .* (small_dot.points) .+ (x,))
# for x in xx
# ]...,
flatmap(tl) do t
fill_with_pattern(
pl[t];
step=rand(.5:.1:5),
direction=degree_rotation(rand(0:359)) * SVector(1,0)
)
end...
]
endmetadatashow_logsèdisabled®skip_as_script«code_folded$a223cf19-8dc7-4e74-8a30-48475b2c8196cell_id$a223cf19-8dc7-4e74-8a30-48475b2c8196code'n(prefix::String, value::Bool) = prefixmetadatashow_logsèdisabled®skip_as_script«code_folded$c065248a-25cb-4f4b-a048-482344e80b7acell_id$c065248a-25cb-4f4b-a048-482344e80b7acodeusing Triangulatemetadatashow_logsèdisabled®skip_as_script«code_folded$d235e2f7-47c0-49e3-b000-1027413dd6a5cell_id$d235e2f7-47c0-49e3-b000-1027413dd6a5code'dot([1,1], rotate_90(SVector(0.5,0.5)))metadatashow_logsèdisabled®skip_as_script«code_folded$264dad85-32a2-42f5-80b6-6644112ab8a1cell_id$264dad85-32a2-42f5-80b6-6644112ab8a1codeusing Printfmetadatashow_logsèdisabled®skip_as_script«code_folded«notebook_id$0080cad6-4aab-11f0-31ad-a3463dd31cc2in_temp_dir¨metadata