Pythagoras tree: Difference between revisions
m
→{{header|J}}
m (→{{header|J}}) |
m (→{{header|J}}) |
||
Line 711:
if. 0<m do.
d=. x-y
p2=.
p3=.
p4=. (0.5*x+y)-0j1.5*d
pd x,y
p4 (<:m) Pt
end.
}}
▲Petri=: {{
pd 'reset'
pd 'type poly'
Line 728 ⟶ 727:
}}
[[File:J-pytree.png]]
| |||