Jump to content

Pythagoras tree: Difference between revisions

m
→‎{{header|J}}: slightly more efficient
m (→‎{{header|J}}: slightly more efficient)
Line 708:
=={{header|J}}==
<syntaxhighlight lang=J>require'plot'
 
Pt=: {{
if. 0<m do.
d=. x-0j1*y-x
p2=. y-0j1*+d
p3=. x-0j1*+d
p4=. (0.5*x+y)-0j1+1.5*d
pd x,y,p2,p3
p3 (<:m) Pt p4
Line 719 ⟶ 720:
end.
}}
 
 
Pytree=: {{
6,962

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.