File: TR_fill.m4

package info (click to toggle)
circuit-macros 10.1.4-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 6,532 kB
  • sloc: makefile: 909; sh: 49
file content (17 lines) | stat: -rw-r--r-- 359 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
.PS
# TR_fill.m4
# https://tex.stackexchange.com/questions/654117/fill-parts-of-a-shape
gen_init

  B: (0,0); "B" at B below
  C: (5,0); "C" at C below
  A: Cintersect(B,4,C,3); "A" at A above
  line from B to C then to A then to B
  RightAngle(B,A,C,0.25)

  rgbfill(0.5,0.5,0.5,
    arc from A to B rad 2
    arc cw to C rad 2.5
    arc to A rad 1.5 )

.PE