IOCCC 1990: Best of Show#include <stdio.h> #include <math.h> #define X #define Y {} #define C } #define o { #undef main char m[500][99],v[99],R; int*a,b,n,i,j,W,A; float Q,G,D,M,T,B,O,U,V,N,y,e(); P(g,R,u)float*g,R,u;{int c;for(*g=1,c=u;c--;*g*=R);} X K(g,R,u)float*g,u;char R; o if(R=='+')*g+=u; if(R=='-')*g-=u; if(R=='*')*g*=u; if(R=='/')*g/=u; if(R=='^')P(g,*g,u); C w(g,R,u)float*g,u;char R; /**/{int b,f;A=atoi(*++a);b
