File: subpathtest3.cfdg

package info (click to toggle)
contextfree 3.1%2Bdfsg1-2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 3,432 kB
  • sloc: cpp: 34,857; lex: 416; makefile: 124; sh: 42; python: 41
file content (22 lines) | stat: -rw-r--r-- 359 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
startshape stars

CF::Time = [time 0 ((sqrt(5)+1)/2)]
CF::FrameTime = (sqrt(5)+1)/2
CF::Size = [s 5 y -0.25]

path star {
    MOVETO(0,1)
    loop 4 [r 144]
        LINETO(cos(234), sin(234))
    CLOSEPOLY()
}
 
path penta(shape doodle) {
    loop 5 [r 72]
        path doodle[y ftime()]
    FILL(CF::EvenOdd)[]
}

shape stars {
    penta(star)[time 0 ∞]
}