levy.cfdg

` 1 `**startshape **levy
2 **background**{**b** **-**1**}**
3 **rule** levy{
4 line{**}**
5 levy{**r** 45 **s** (1/**sqrt**(2)) **x** **-**1**}**
6 levy{**r** **-**45 **s** (1/**sqrt**(2)) **x** **-**1**}**
7 **}**
8 **rule** line{
9 **SQUARE**{**s** 1 .1 **b** 1 **h** 360 **b** 1 **sat** 1**}**
10 **}**

** **

** **

levy.cfdg

Alternative Lévy Curve

` 1 `**startshape **levy
2 **background**{**h** 0 **sat** .01 **b** .01**}**
3
4 **rule** levy {
5 **SQUARE**{**s** 1 .5 **a** **-**.8 **b** .7 **sat** .3**}**
6 levy{**s** (1/**sqrt**(2)) **r** **-**45 **x** .25**}**
7 levy{**s** (1/**sqrt**(2)) **r** 45 **x** **-**.25**}**
8 **}**
9

` `

` `

` `

` `

` `

` `

` `

` `

` `

` `

` `

` `

` `

```
```

` `

` `

levy.cfdg

`Yet another Lévy Curve`

` 1 `**startshape **levy
2 **background**{**b** 1**}**
3
4 **rule** levy {
5 segment{**}**
6 levy{**s** (1/**sqrt**(2)) **r** **-**45 **x** .25**}**
7 levy{**s** (1/**sqrt**(2)) **r** 45 **x** **-**.25**}**
8 **}**
9
10 **path** segment{
11 **MOVETO**{**x** **-**.5 **y** **-**.5**}**
12 **LINETO**{**x** **-**.5**}**
13 **LINETO**{**x** .5**}**
14 **LINETO**{**x** .5 **y** **-**.5**}**
15 **STROKE**{width .05 **b** **-**.5 **a** **-**.7**}**
16 **}**

** **

** **

## No comments:

## Post a Comment