<br><br>On Tue, May 17, 2011 at 3:14 PM, Sam Tobin-Hochstadt &lt;<a href="mailto:samth@ccs.neu.edu">samth@ccs.neu.edu</a>&gt; wrote:<br>&gt; Lots of people have written similar things (`cut&#39; in SRFI 26, Jay&#39;s<br>&gt; `super-cut&#39;, etc), but I&#39;d like to move towards using it implicitly.<br>

<br>I use (require (rename-in srfi/26 [cut //])) and that&#39;s simple enough for me. I find the implicit version harder to read. You have to read further to the right before realizing you are inside a function, and it is easy to miss.<br>

<br>Here are two example from my code of how it looks.<br><br><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">(define common-confusions<br>  (count-instances<br>   (filter-not all-the-same?<br>               (map (// sort &lt;&gt; &lt;)<br>

                    (map (// take &lt;&gt; 2) summary)))))<br></font><br><br><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">(define (non-whitespace-diff? . strings)<br>  (define collapsed (map (// regexp-replace* #px&quot;[[:space:]]{2,}&quot; &lt;&gt; &quot; &quot;) strings))<br>

  (not (andmap (// equal? (first collapsed) &lt;&gt;) (rest collapsed))))<br></font><br>