家紋シリーズ　稲妻(2)　角立て絡み稲妻

家紋シリーズ　稲妻(2)　角立て絡み稲妻

plotter.jl を include

sangaku0418.hatenablog.com

include("plotter.jl")

function sumitatekaramiinazuma(; r=1, width=400, height=400)
    plotbegin(w=width, h=height)
    x = [0, 39, 5, -29, -5, 19, 5, -9, -5, 5, 11, -5,
         -21, 5, 31, -4] .* r
    y = [-39, 0, 34, 0, -24, 0, 14, 0, -4, 6, 0, -16,
         0, 26, 0, -35] .* r
    plotpolygon(x, y, lwd=0, fcol=:black)
    plotpolygon(-x , -y, lwd=0, fcol=:black)
    plotend()
end

sumitatekaramiinazuma()