list-compare-help.pd 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243
  1. #N canvas 0 26 529 463 10;
  2. #X floatatom 149 244 5 0 0 0 - - -;
  3. #X obj 213 244 loadbang;
  4. #X msg 149 217 0;
  5. #X msg 179 217 4;
  6. #X msg 134 169 seven;
  7. #X msg 134 196 symbol eight;
  8. #X obj 134 316 list-compare;
  9. #X obj 134 354 tgl 24 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  10. 1;
  11. #X obj 134 389 print EQUAL?;
  12. #X text 69 21 [list-compare];
  13. #X text 108 42 Compare two lists element by element.;
  14. #X floatatom 228 295 5 0 0 0 - - -;
  15. #X text 134 90 Out: 1 if equal \, 0 if not equal.;
  16. #X text 134 66 In: two lists to compare.;
  17. #X msg 134 115 0 1 2 3 4 5 6 seven eight;
  18. #X msg 134 142 0 1 2 3 4 5 6 seventy eight;
  19. #X msg 213 271 0 1 2 3 4 5 6 seven eight;
  20. #N canvas 416 170 494 396 META 0;
  21. #X text 12 5 KEYWORDS control list_op;
  22. #X text 12 25 LICENSE SIBSD;
  23. #X text 12 125 AUTHOR Frank Barknecht;
  24. #X text 12 145 HELP_PATCH_AUTHORS Frank Barknecht. "pd meta" information
  25. added by Jonathan Wilkes for Pd version 0.42.;
  26. #X text 12 105 OUTLET_0 float;
  27. #X text 12 65 INLET_0 anything;
  28. #X text 12 85 INLET_1 anything;
  29. #X text 12 45 DESCRIPTION compare two lists element by element;
  30. #X restore 456 427 pd META;
  31. #X connect 0 0 6 0;
  32. #X connect 1 0 16 0;
  33. #X connect 2 0 0 0;
  34. #X connect 3 0 0 0;
  35. #X connect 4 0 6 0;
  36. #X connect 5 0 6 0;
  37. #X connect 6 0 7 0;
  38. #X connect 7 0 8 0;
  39. #X connect 11 0 6 1;
  40. #X connect 14 0 6 0;
  41. #X connect 15 0 6 0;
  42. #X connect 16 0 6 1;