Brownian tree: Difference between revisions
m
→{{header|Phix}}
m (Phix/pGUI) |
|||
Line 2,820:
As-is, runs in about 2s, but can be very slow when bigger or (even worse) resize-able.
{{libheader|Phix/pGUI}}
<lang Phix>-- demo\rosetta\BrownianTree.exw
include pGUI.e
Line 2,867 ⟶ 2,865:
cdCanvasSetForeground(cddbuffer, CD_RED)
return IUP_DEFAULT
end function
Line 2,883 ⟶ 2,876:
dlg = IupDialog(canvas, "RESIZE=NO")
IupSetAttribute(dlg, "TITLE", "Brownian Tree")
IupCloseOnEscape(dlg)
IupSetCallback(canvas, "ACTION", Icallback("redraw_cb"))
|