home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / listings / v_09_05 / 9n05095a < prev    next >
Text File  |  1991-02-17  |  2KB  |  73 lines

  1.  
  2. #include <stdio.h>
  3.  
  4. #define d define
  5.  
  6. #d b12(x) 12 x
  7. #d a13(x) x 13
  8. #d a16(x) x 16
  9. #d a32(x) x 32
  10. #d acb(x) x]
  11. #d acc(x) x}
  12. #d aco(x) x:
  13. #d bco(x) :x
  14. #d acp(x) x)
  15. #d bef(x) EOF x
  16. #d aeq(x) x=
  17. #d afo(x) x for
  18. #d age(x) x fgetc
  19. #d asi(x) x stdin
  20. #d aso(x) x stdout
  21. #d bgt(x) >x
  22. #d ai(x) x i
  23. #d aj(x) x j
  24. #d al(x) x l
  25. #d ami(x) x-
  26. #d bne(x) !=x
  27. #d aob(x) x[
  28. #d aop(x) x(
  29. #d apl(x) x+
  30. #d bpu(x) fputc x
  31. #d bqm(x) ?x
  32. #d aqm(x) x?
  33. #d aqu(x) x'
  34. #d ase(x) x;
  35. #d awh(x) x while
  36. #d axo(x) x^
  37. #d a0(x) x 0
  38. #d b13(x) 13 x
  39. #d b16(x) 16 x
  40. #d b19(x) 19 x
  41. #d b48(x) 48 x
  42. #d a64(x) x 64
  43. #d b66(x) 66 x
  44. #d bcb(x) ]x
  45. #d bch(x) char x
  46. #d bcm(x) ,x
  47. #d acm(x) x,
  48. #d bcp(x) )x
  49. #d beq(x) =x
  50. #d bex(x) extern x
  51. #d bi(x) i x
  52. #d bin(x) int x
  53. #d bix(x) index x
  54. #d bj(x) j x
  55. #d bl(x) l x
  56. #d alt(x) x<
  57. #d bma(x) main x
  58. #d bob(x) [x
  59. #d boc(x) {x
  60. #d bop(x) (x
  61. #d bpl(x) +x
  62. #d app(x) x++
  63. #d bqu(x) 'x
  64. #d bse(x) ;x
  65. #d bst(x) *x
  66.  
  67. bma(acp(bop(app(bcp(ai(boc(ase(bch(a16(bl(alt(bob(ai(b66(ase(bcb(a0(bcm(aeq(bst(acb(bj(a64(bse(aob(bin(al(bi(aeq(bse(ai(bex(aop(bch(afo(bst(ase(bix(())))))))))))))))))))))))))))))))))))))))
  68. bl(ai(bob(aob(bi(al(bcb(aop(beq(apl(b13(a13(bpl(aeq(bop(acb(bl(bob(a32(bi(bpl(apl(b16(bcb(ai(beq(b19(aob(bpl(bop(l))))))))))))))))))))))))))))))
  69. bpl(acp(b48(acp(asi(bcb(aop(beq(age(bop(aeq(bi(ai(bgt(aop(b12(aop(bqm(awh(b12(ase(bco(acp(bi(acp(bcp(acp(bpl(aqu(bqu(A))))))))))))))))))))))))))))))
  70. bne(acc(bef(ase(bcp(acp(aso(bpu(acm(ai(bop(aco(bop(acb(bj(al(beq(ami(bix(aj(axo(bop(a16(aob(bl(al(aqm(bcm(acp(acp(i))))))))))))))))))))))))))))))
  71.  
  72.  
  73.