From 02a5595973b61d2cf789b9074167ed73b928d157 Mon Sep 17 00:00:00 2001
From: Guenter  Geiger <ggeiger@users.sourceforge.net>
Date: Wed, 13 Nov 2002 08:38:02 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r206, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/; revision=207
---
 xgui/physics/force.pd | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 xgui/physics/force.pd

(limited to 'xgui/physics/force.pd')

diff --git a/xgui/physics/force.pd b/xgui/physics/force.pd
new file mode 100644
index 00000000..7371eb9c
--- /dev/null
+++ b/xgui/physics/force.pd
@@ -0,0 +1,29 @@
+#N canvas 534 341 718 332 12;
+#X obj 25 78 inlet;
+#X obj 25 254 outlet;
+#X text 580 265 dh20020401;
+#X obj 388 143 r b_force;
+#X text 17 8 force name x y;
+#X obj 25 200 vector \$1_force \$2 \$3;
+#X msg 388 170 ?xy;
+#X obj 388 199 vector \$1_force \$2 \$3;
+#X obj 388 254 outlet;
+#X obj 388 226 convert xy= force;
+#X obj 25 104 route !force ?force !abs;
+#X obj 25 227 convert xy= force=;
+#X msg 25 133 !xy \$1 \$2;
+#X msg 119 132 ?xy;
+#X msg 166 131 !abs \$1;
+#X connect 0 0 10 0;
+#X connect 3 0 6 0;
+#X connect 5 0 11 0;
+#X connect 6 0 7 0;
+#X connect 7 0 9 0;
+#X connect 9 0 8 0;
+#X connect 10 0 12 0;
+#X connect 10 1 13 0;
+#X connect 10 2 14 0;
+#X connect 11 0 1 0;
+#X connect 12 0 5 0;
+#X connect 13 0 5 0;
+#X connect 14 0 5 0;
-- 
cgit v1.2.1