/usr/lib/pd/extra/rtc/infinity-row-help.pd is in pd-rtclib 4.1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 | #N canvas 680 138 537 524 10;
#X msg 336 24 Harmony;
#X text 221 275 row index;
#X floatatom 188 275 0 0 0 0 - - -;
#X obj 430 202 bng 15 250 50 0 empty empty reset 0 -6 0 8 -262144 -1
-1;
#X floatatom 262 207 4 0 0 2 interval_projection - -;
#X text 21 477 1996 by Karlheinz Essl;
#X floatatom 92 218 4 0 0 2 start-note - -;
#X floatatom 60 273 0 0 0 0 - - -;
#X text 91 274 note;
#X obj 60 421 play2 127 200 1 1;
#X floatatom 98 396 0 0 0 0 - - -;
#N canvas 296 111 503 419 dynamic 0;
#X obj 148 273 outlet;
#X text 44 31 Every 4th note will be played mf;
#X text 44 47 Every 16th note will be played f;
#X text 44 62 The rest is played p;
#X text 64 81 >>> reflecting the "fractal" structure of the row;
#X obj 62 118 inlet;
#N canvas 287 70 450 300 every_16th 0;
#X obj 96 117 expr $i1 % 16 == 0;
#X obj 96 91 t a a;
#X obj 96 250 outlet;
#X obj 96 62 inlet;
#X obj 160 60 inlet;
#X obj 96 196 int 127;
#X obj 96 142 select 1 0;
#X obj 171 197 int;
#X obj 171 247 outlet;
#X connect 0 0 6 0;
#X connect 1 0 0 0;
#X connect 1 1 7 1;
#X connect 3 0 1 0;
#X connect 4 0 5 1;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X connect 6 1 7 0;
#X connect 7 0 8 0;
#X restore 62 184 pd every_16th;
#N canvas 287 70 450 300 every_4th 0;
#X obj 96 230 outlet;
#X obj 96 62 inlet;
#X obj 185 62 inlet;
#X obj 96 116 expr $i1 % 4 == 0;
#X obj 146 62 inlet;
#X obj 96 142 select 1 0;
#X obj 147 186 int 30;
#X obj 96 186 int 70;
#X connect 1 0 3 0;
#X connect 2 0 6 1;
#X connect 3 0 5 0;
#X connect 4 0 7 1;
#X connect 5 0 7 0;
#X connect 5 1 6 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X restore 148 242 pd every_4th;
#X msg 187 217 70;
#X text 215 218 mf;
#X text 271 217 p;
#X msg 245 219 30;
#X msg 148 161 127;
#X text 185 161 forte;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X connect 6 1 7 0;
#X connect 7 0 0 0;
#X connect 8 0 7 1;
#X connect 11 0 7 2;
#X connect 12 0 6 1;
#X restore 98 369 pd dynamic;
#X text 12 93 NB: The fourth \, sixteenth \, sixtyfourth etc. note
of the row is identical!;
#X text 12 29 infinity-row;
#X text 143 397 velocity;
#X obj 60 175 metro 150;
#X floatatom 158 145 4 0 0 2 speed - -;
#X obj 60 143 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1
1 1;
#X obj 60 218 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 179 207 hradio 15 1 0 3 empty empty mode 0 -6 0 8 -262144 -1
-1 0;
#X obj 60 244 infinity-row 70 0 1;
#X text 12 47 Found by Per Noergaard (1959) \, further variants by
Peter Richter (1996) - also see: http://www.pernoergaard.dk;
#X text 242 475 TODO Pd: The Richter variants;
#X connect 2 0 11 0;
#X connect 3 0 20 4;
#X connect 4 0 20 3;
#X connect 6 0 20 1;
#X connect 7 0 9 0;
#X connect 10 0 9 1;
#X connect 11 0 10 0;
#X connect 15 0 18 0;
#X connect 16 0 15 1;
#X connect 17 0 15 0;
#X connect 18 0 20 0;
#X connect 19 0 20 2;
#X connect 20 0 7 0;
#X connect 20 1 2 0;
|