chiark / gitweb /
new test phys
authorian <ian>
Sun, 27 Jun 2004 18:55:39 +0000 (18:55 +0000)
committerian <ian>
Sun, 27 Jun 2004 18:55:39 +0000 (18:55 +0000)
layout/testphys.m4

index 904a7f6577c8f196789650a95b08dca9ba20fbe5..99cb7b9cd2a97f7bee17c13d226222b8f041dd40 100644 (file)
@@ -1,7 +1,16 @@
-define(theta,38.50)
-abs a 5 50 0
-extend a b ang theta -230
-extend b c uptoang 0 230
-extend c d ang theta 230
-extend d e uptoang 0 -230
-extend e f len 300
+# -* fundamental -*-
+
+include(`parts.i4')
+
+abs c0 200 100 15
+extend -c0 -c1 len 150 230
+part pt pt_peco_sl c c0
+
+extend pt_a a1 len 150 230
+extend a1 a2 len 50 -315
+extend a2 a3 len 50 -315
+
+extend pt_b b1 len 300 230
+extend b1 b2 len 50 -315
+extend b2 b3 len 50 -315
+extend b3 b4 len 50 -315