corrade-nucleus-nucleons – Blame information for rev 20
?pathlinks?
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 20 | office | 1 | {- Ace {- 4 -} Elm -} |
| 2 | main = lift clock (every second) |
||
| 3 | |||
| 4 | clock t = collage 400 400 [ filled lightGrey (ngon 12 110) |
||
| 5 | , outlined (solid grey) (ngon 12 110) |
||
| 6 | , hand orange 100 t |
||
| 7 | , hand charcoal 100 (t/60) |
||
| 8 | , hand charcoal 60 (t/720) ] |
||
| 9 | |||
| 10 | hand clr len time = |
||
| 11 | let angle = degrees (90 - 6 * inSeconds time) |
||
| 12 | in traced (solid clr) <| segment (0,0) (len * cos angle, len * sin angle) |