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 |
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}}== |