#!/usr/bin/m4 -Dchoice=
-dnl run with -Dchoice='...'
+dnl run with -Dchoice='...' -Dminradius=NNN
+
+layer l
define(`simple',`
rel b$2 b$2x$1 0 0 $1
-join a$2 -b$2x$1 0 choice
+join a$2 -b$2x$1 minradius choice
')
define(`complex',`
abs org$1 $2 $3 0
rel org$1 a$1 0 0 $4
rel org$1 b$1 200 0 0
-simple(0,$1)
-simple(30,$1)
-simple(60,$1)
-simple(90,$1)
-simple(135,$1)
-simple(230,$1)
-simple(300,$1)
-simple(345,$1)
+ simple(0,$1)
+ simple(30,$1)
+ simple(60,$1)
+ simple(90,$1)
+ simple(135,$1)
+ simple(230,$1)
+ simple(300,$1)
+ simple(345,$1)
')
-complex(0, 200,300, 0 )
-complex(30, 200,800, 30 )
-complex(60, 200,1400, 60 )
-complex(m130, 1000,500, -130 )
-complex(m165, 1000,1500, -165)
+ complex(0, 200, 400, 0)
+ complex(30, 200, 1200, 30)
+ complex(60, 800, 400, 60)
+ complex(130, 800, 1200, 130)
+ complex(m130, 1500, 400, -130)
+ complex(m165, 1500, 1200, -165)