[PD-cvs] externals/mapping/pd delay_n.pd, NONE, 1.1 diff_n.pd, NONE, 1.1 distance_n.pd, NONE, 1.1 last_n.pd, NONE, 1.1 local_max.pd, NONE, 1.1 local_min.pd, NONE, 1.1 max_n.pd, NONE, 1.1 mean_n.pd, NONE, 1.1 min_n.pd, NONE, 1.1 curve_exp.pd, 1.2, 1.3

[Hans-Christoph Steiner]

Update of /cvsroot/pure-data/externals/mapping/pd
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13835/pd

Modified Files:
	curve_exp.pd 
Added Files:
	delay_n.pd diff_n.pd distance_n.pd last_n.pd local_max.pd 
	local_min.pd max_n.pd mean_n.pd min_n.pd 
Log Message:
added Cyrille's list handling objects

--- NEW FILE: local_min.pd ---
#N canvas 552 108 250 310 10;
#X obj 78 218 f;
#X obj 78 140 < 0;
#X obj 53 69 t f f;
#X obj 78 107 -;
#X obj 78 192 sel 0;
#X obj 94 69 f;
#X obj 53 44 t f f b;
#X obj 78 166 change;
#X obj 78 243 outlet;
#X obj 53 16 inlet;
#X connect 0 0 8 0;
#X connect 1 0 7 0;
#X connect 2 0 3 1;
#X connect 2 1 3 0;
#X connect 3 0 1 0;
#X connect 4 0 0 0;
#X connect 5 0 0 1;
#X connect 6 0 2 0;
#X connect 6 1 5 1;
#X connect 6 2 5 0;
#X connect 7 0 4 0;
#X connect 9 0 6 0;

--- NEW FILE: diff_n.pd ---
#N canvas 246 155 294 362 10;
#X obj 59 49 inlet;
#X obj 59 184 outlet;
#X obj 175 93 inlet;
#X obj 59 93 t f f;
#X obj 59 152 -;
#X obj 89 119 delay_n \$1;
#X connect 0 0 3 0;
#X connect 2 0 5 1;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 1 0;
#X connect 5 0 4 1;

--- NEW FILE: max_n.pd ---
#N canvas 0 0 462 312 10;
#X obj 64 57 inlet;
#X obj 144 56 inlet;
#X obj 64 179 maximum;
#X obj 64 207 outlet;
#X obj 144 120 max 2;
#X obj 160 76 loadbang;
#X obj 160 97 \$1;
#X obj 64 149 last_n;
#X connect 0 0 7 0;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 4 0 7 1;
#X connect 5 0 6 0;
#X connect 6 0 4 0;
#X connect 7 0 2 0;

--- NEW FILE: mean_n.pd ---
#N canvas 248 541 341 340 10;
#X obj 46 26 inlet;
#X obj 125 26 inlet;
#X obj 46 297 outlet;
#X obj 62 130 list split 1;
#X obj 101 153 list;
#X obj 62 178 +;
#X obj 62 203 f;
#X obj 46 85 t b a b;
#X msg 90 109 0;
#X obj 46 230 f;
#X obj 46 263 / \$1;
#X obj 46 57 last_n \$1;
#X connect 0 0 11 0;
#X connect 1 0 10 1;
#X connect 1 0 11 1;
#X connect 3 0 5 0;
#X connect 3 1 4 0;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X connect 6 0 5 1;
#X connect 6 0 9 1;
#X connect 7 0 9 0;
#X connect 7 1 3 0;
#X connect 7 2 8 0;
#X connect 8 0 5 1;
#X connect 9 0 10 0;
#X connect 10 0 2 0;
#X connect 11 0 7 0;

--- NEW FILE: distance_n.pd ---
#N canvas 872 510 450 424 10;
#N canvas 640 117 487 367 drip-two-lists 0;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X obj 157 240 outlet;
#X obj 225 242 outlet;
#X obj 321 95 inlet;
#X text 272 240 End;
#X obj 64 156 t a b;
#N canvas 0 0 533 407 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 8 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 11 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 9 0 12 0;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X restore 64 122 pd drip;
#N canvas 0 0 533 407 dripslow 0;
#X obj 87 232 list split 1;
#X obj 87 207 list append;
#X obj 87 283 outlet;
#X obj 87 83 inlet;
#X obj 166 283 outlet;
#X obj 159 81 inlet;
#X obj 87 118 b;
#X text 202 82 list;
#X text 42 83 bang;
#X text 210 283 EOL;
#X text 28 282 element;
#X obj 166 253 b;
#X connect 0 0 2 0;
#X connect 0 1 1 1;
#X connect 0 2 11 0;
#X connect 1 0 0 0;
#X connect 3 0 6 0;
#X connect 5 0 1 1;
#X connect 6 0 1 0;
#X connect 11 0 4 0;
#X restore 158 191 pd dripslow;
#X connect 1 0 7 0;
#X connect 4 0 8 1;
#X connect 6 0 0 0;
#X connect 6 1 8 0;
#X connect 7 0 6 0;
#X connect 7 1 3 0;
#X connect 8 0 2 0;
#X restore 133 139 pd drip-two-lists;
#X obj 113 27 inlet;
#X obj 287 20 inlet;
#X obj 133 167 -;
#X obj 133 195 t f f;
#X obj 133 224 *;
#X obj 134 278 f;
#X obj 133 256 +;
#X msg 196 197 0;
#X obj 118 300 f;
#X obj 119 325 sqrt;
#X obj 118 349 outlet;
#X msg 313 61 1 2 3 5 7 8;
#X msg 134 62 1 2 3 4 5 6;
#X obj 246 99 list;
#X obj 115 98 t b a b b;
#X connect 0 0 3 0;
#X connect 0 1 3 1;
#X connect 1 0 15 0;
#X connect 2 0 14 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 5 1;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 6 0 9 1;
#X connect 7 0 6 0;
#X connect 8 0 7 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 12 0 14 1;
#X connect 13 0 15 0;
#X connect 14 0 0 1;
#X connect 15 0 9 0;
#X connect 15 1 0 0;
#X connect 15 2 8 0;
#X connect 15 3 14 0;

--- NEW FILE: last_n.pd ---
#N canvas 417 318 723 395 10;
#X floatatom 356 89 5 0 0 2 change-size - -;
#X obj 326 112 t f b;
#X text 378 110 first reset (b) \, then set new length (f).;
#X text 311 195 Right outlet is responsible to first fill the list
;
#X text 322 217 Left outlet then only lets the smaller list pass.;
#X obj 180 183 list;
#X obj 326 54 inlet;
#X obj 180 149 inlet;
#X obj 180 302 outlet;
#X obj 180 228 list split \$1;
#X connect 0 0 1 0;
#X connect 1 0 9 1;
#X connect 1 1 5 1;
#X connect 5 0 9 0;
#X connect 6 0 1 0;
#X connect 7 0 5 0;
#X connect 9 0 5 1;
#X connect 9 0 8 0;
#X connect 9 2 5 1;

Index: curve_exp.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/mapping/pd/curve_exp.pd,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** curve_exp.pd	29 Jan 2006 08:12:33 -0000	1.2
--- curve_exp.pd	10 Feb 2006 05:21:35 -0000	1.3
***************
*** 1,7 ****
! #N canvas 225 325 507 333 10;
  #X obj 37 25 inlet;
  #X obj 37 262 outlet;
  #X obj 38 63 moses 0;
- #X obj 22 116 abs;
  #X obj 22 189 * -1;
  #X obj 22 168 dbtorms;
--- 1,6 ----
! #N canvas 225 325 511 337 10;
  #X obj 37 25 inlet;
  #X obj 37 262 outlet;
  #X obj 38 63 moses 0;
  #X obj 22 189 * -1;
  #X obj 22 168 dbtorms;
***************
*** 14,24 ****
  #X text 31 282 (C) Copyright 2006 Hans-Christoph Steiner <hans at at.or.at>
  ;
  #X connect 0 0 2 0;
! #X connect 2 0 3 0;
! #X connect 2 1 7 0;
! #X connect 3 0 6 0;
! #X connect 4 0 1 0;
  #X connect 5 0 4 0;
! #X connect 6 0 5 0;
! #X connect 7 0 8 0;
! #X connect 8 0 1 0;
--- 13,24 ----
  #X text 31 282 (C) Copyright 2006 Hans-Christoph Steiner <hans at at.or.at>
  ;
+ #X obj 22 116 * -1;
  #X connect 0 0 2 0;
! #X connect 2 0 12 0;
! #X connect 2 1 6 0;
! #X connect 3 0 1 0;
! #X connect 4 0 3 0;
  #X connect 5 0 4 0;
! #X connect 6 0 7 0;
! #X connect 7 0 1 0;
! #X connect 12 0 5 0;

--- NEW FILE: delay_n.pd ---
#N canvas 212 243 661 510 10;
#X obj 160 88 t f b;
#X obj 49 86 list;
#X obj 159 50 inlet;
#X obj 49 52 inlet;
#X obj 93 200 outlet;
#X obj 49 131 list split \$1;
#X connect 0 0 5 1;
#X connect 0 1 1 1;
#X connect 1 0 5 0;
#X connect 2 0 0 0;
#X connect 3 0 1 0;
#X connect 5 0 1 1;
#X connect 5 1 4 0;
#X connect 5 2 1 1;

--- NEW FILE: local_max.pd ---
#N canvas 609 111 302 364 10;
#X obj 50 165 > 0;
#X obj 50 244 f;
#X obj 25 101 t f f;
#X obj 50 139 -;
#X obj 50 218 sel 0;
#X obj 67 100 f;
#X obj 25 62 t f f b;
#X obj 50 191 change;
#X obj 50 279 outlet;
#X obj 25 22 inlet;
#X connect 0 0 7 0;
#X connect 1 0 8 0;
#X connect 2 0 3 1;
#X connect 2 1 3 0;
#X connect 3 0 0 0;
#X connect 4 0 1 0;
#X connect 5 0 1 1;
#X connect 6 0 2 0;
#X connect 6 1 5 1;
#X connect 6 2 5 0;
#X connect 7 0 4 0;
#X connect 9 0 6 0;

--- NEW FILE: min_n.pd ---
#N canvas 26 291 365 247 10;
#X obj 64 175 outlet;
#X obj 64 147 minimum;
#X obj 64 27 inlet;
#X obj 144 26 inlet;
#X obj 144 89 max 2;
#X obj 160 46 loadbang;
#X obj 160 66 \$1;
#X obj 64 118 last_n;
#X connect 1 0 0 0;
#X connect 2 0 7 0;
#X connect 3 0 4 0;
#X connect 4 0 7 1;
#X connect 5 0 6 0;
#X connect 6 0 4 0;
#X connect 7 0 1 0;