00100 begin 00200 require "[]()" delimiters; 00300 define int(a)=[assignc a=0; outstr(cvps(a));]; 00400 int(); 00500 end