/usr/lib/pd/extra/rtc/choice-rhythm.pd is in pd-rtclib 4.1-2.
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 | #N canvas 64 49 516 465 10;
#X declare -lib libdir -lib list-abs;
#X obj 257 55 inlet;
#X obj 298 54 inlet;
#X obj 214 54 inlet;
#X obj 174 54 inlet;
#X obj 69 54 inlet;
#X obj 446 54 inlet;
#X text 401 200 list length;
#X obj 458 414 outlet;
#X text 178 414 1993 by Karlheinz Essl;
#X obj 69 138 t f b;
#X obj 164 415 outlet;
#X obj 69 414 outlet;
#X obj 69 381 metro 1000;
#X text 181 349 ED;
#X obj 257 108 - 1;
#X obj 82 85 sel 1;
#X text 173 223 chosen list index;
#X obj 134 191 random 6;
#X obj 210 175 t l l l;
#X obj 348 418 outlet;
#X obj 257 81 int \$3;
#X obj 210 148 make-choice-list 1 \$4 0 \$3;
#X obj 318 240 t a a;
#X obj 357 87 t a a;
#X obj 134 312 trans-log \$1 \$2 \$3;
#X obj 134 338 t a a;
#N canvas 477 288 450 300 nth 0;
#X obj 113 155 list-idx;
#X obj 113 129 list;
#X obj 113 101 t b a;
#X obj 113 80 inlet;
#X obj 157 79 inlet;
#X obj 113 178 outlet;
#X connect 0 0 5 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 2 1 0 1;
#X connect 3 0 2 0;
#X connect 4 0 1 1;
#X restore 134 246 pd nth;
#X obj 318 217 list length;
#X obj 446 84 b;
#X obj 84 444 declare -lib libdir -lib list-abs;
#X connect 0 0 20 0;
#X connect 1 0 21 2;
#X connect 2 0 24 2;
#X connect 3 0 24 1;
#X connect 4 0 9 0;
#X connect 4 0 15 0;
#X connect 5 0 28 0;
#X connect 9 0 12 0;
#X connect 9 1 17 0;
#X connect 12 0 11 0;
#X connect 12 0 17 0;
#X connect 14 0 23 0;
#X connect 15 0 20 0;
#X connect 17 0 26 0;
#X connect 18 0 7 0;
#X connect 18 1 27 0;
#X connect 18 2 26 1;
#X connect 20 0 14 0;
#X connect 21 0 18 0;
#X connect 22 0 17 1;
#X connect 22 1 19 0;
#X connect 23 0 24 3;
#X connect 23 1 21 4;
#X connect 24 0 25 0;
#X connect 25 0 12 1;
#X connect 25 1 10 0;
#X connect 26 0 24 0;
#X connect 27 0 22 0;
#X connect 28 0 21 0;
|