From 3073b045f5a0108e56bd221e251bfc8914e27dd8 Mon Sep 17 00:00:00 2001
From: ian <ian>
Date: Sat, 30 Sep 2006 13:01:56 +0000
Subject: [PATCH] big circle templates as well as little ones

---
 layout/bigcircles.m4 | 13 +++++++++++++
 layout/circles.i4    | 12 ++++++++++++
 layout/dualjn.m4     | 16 ++++------------
 3 files changed, 29 insertions(+), 12 deletions(-)
 create mode 100644 layout/bigcircles.m4
 create mode 100644 layout/circles.i4

diff --git a/layout/bigcircles.m4 b/layout/bigcircles.m4
new file mode 100644
index 0000000..e7064b0
--- /dev/null
+++ b/layout/bigcircles.m4
@@ -0,0 +1,13 @@
+define(pt_circ, pt_peco_mr)
+define(radius_circ, 315)
+
+include(parts.i4)
+include(circles.i4)
+
+abs tcp0_p_c 1600 800 7
+part tcp0 tricirpair p_c
+
+circle(700, 800)
+
+abs tcp1_p_c 500 800 173
+part tcp1 ^tricirpair p_c
diff --git a/layout/circles.i4 b/layout/circles.i4
new file mode 100644
index 0000000..7c28471
--- /dev/null
+++ b/layout/circles.i4
@@ -0,0 +1,12 @@
+
+defobj tricirpair
+ abs p_c 200 200 0
+ part p pt_circ c
+ extend p_a e_a ang 270 -radius_circ
+ extend p_b e_b ang 270 radius_circ
+enddef
+
+define(`circle',`
+abs circcircl$1x$2 $1 $2 90
+extend circcircl$1x$2 circcircll$1x$2 ang 359 radius_circ
+')
diff --git a/layout/dualjn.m4 b/layout/dualjn.m4
index 9688bf2..0580702 100644
--- a/layout/dualjn.m4
+++ b/layout/dualjn.m4
@@ -1,4 +1,8 @@
+define(pt_circ, pt_peco_sr)
+define(radius_circ, 230)
+
 include(parts.i4)
+include(circles.i4)
 
 abs pt_i_c 400 800 130
 part pt_i pt_peco_cl c
@@ -24,22 +28,10 @@ extend -pt_o_c -o_begin uptoang 180 315
 #extend pt_o_a so_end uptoang 180 -315
 rel si_end so_end 0 37
 
-defobj tricirpair
- abs p_c 200 200 0
- part p pt_peco_sr c
- extend p_a e_a ang 270 -230
- extend p_b e_b ang 270 230
-enddef
-
 abs tcp0_p_c 1500 1100 90
 part tcp0 tricirpair p_c
 
 abs tcp1_p_c 1500 400 90
 part tcp1 ^tricirpair p_c
 
-define(`circle',`
-abs c230l$1x$2 $1 $2 90
-extend c230l$1x$2 c230ll$1x$2 ang 359 230
-')
-
 circle(600,800)
-- 
2.30.2