bin/bin/dc-wrapped.sh

   1 #!/bin/sh
   2
   3 # natural logarithm: 1000lLx 10lLx /p
   4 # sum of everything in stack: lSxp
   5 pre="5k 10o \
   6 [1-d2+/d2*Skd*Sy0Ss10K^Sp[d1r/lk*ls+lsrdss-lp*d*1[s_q]s_>_lkly*sk2+lfx]Sf1lfxLsLkLyLpLfs_s_s_s_]sL \
   7 [0d[+2z>a]salax]sS
   8 "
   9 exec rlwrap \
  10     --history-filename /tmp/.dc_history \
  11     --substitute-prompt "> " \
  12     --prompt-colour=red \
  13     --wait-before-prompt -1 \
  14     --pre-given "$pre" dc