Use another language to call a function: Difference between revisions

Content deleted Content added
Line 768: Line 768:
ROT13() is implemented as a PARI one-line:<lang parigp>Strchr(Vecsmall(apply(k->if(k>96&&k<123,(k-84)%26+97,if(k>64&&k<91,(k-52)%26+65,k)),Vec(Vecsmall(s)))))</lang>
ROT13() is implemented as a PARI one-line:<lang parigp>Strchr(Vecsmall(apply(k->if(k>96&&k<123,(k-84)%26+97,if(k>64&&k<91,(k-52)%26+65,k)),Vec(Vecsmall(s)))))</lang>
PARI's interface to Query()...
PARI's interface for Query()...
<lang C>#include <pari/pari.h>
<lang C>#include <pari/pari.h>


Line 801: Line 801:


Output:<pre>Here I am</pre>
Output:<pre>Here I am</pre>



=={{header|Pascal}}==
=={{header|Pascal}}==