| author | Francesco Abbate <francesco.bbt@gmail.com> | 2011年10月28日 15:19:52 +0200 |
|---|---|---|
| committer | Francesco Abbate <francesco.bbt@gmail.com> | 2011年10月28日 15:19:52 +0200 |
| commit | 108005cc507a81c8fc155ab24c3e87fd3e6e14f7 (patch) | |
| tree | 7f443ef522c49a897b8e5804c43a28720d12ccfb /demos/fractals.lua | |
| parent | 485292c127db59762d50ae333270a8ad1ea32c3f (diff) | |
| download | gsl-shell-108005cc507a81c8fc155ab24c3e87fd3e6e14f7.tar.gz | |
| -rw-r--r-- | demos/fractals.lua | 3 |
diff --git a/demos/fractals.lua b/demos/fractals.lua index 84ceb3c1..d6c8d0cf 100644 --- a/demos/fractals.lua +++ b/demos/fractals.lua @@ -12,8 +12,6 @@ local function c_generator(n, n_angle, len_frac, g) local sh = ilist(|k| g[(k-1)%r+1] - g[(k-2)%r+1], r) local a = (g[1]*n) % n_angle - print('sh', sh) - local z = 0 return function() if w[n+1] == 0 then @@ -21,7 +19,6 @@ local function c_generator(n, n_angle, len_frac, g) z = z + sz[a+1] for j=1,n+1 do w[j] = (w[j] + 1) % r - print(j, w[j], sh[w[j]+1], a) a = (a + sh[w[j]+1]) % n_angle if w[j] ~= 0 then break |