• Source 
    1. * bra:   0
    2. * ket:   1
    3. * lt:    2
    4. * gt:    3
    5. * plus:  4
    6. * minus: 5
    7. * comma: 6
    8. * dot:   7
    9. * pipe:  minus 1 ( end of source )
    10.  
    11. * load source
    12. *_ec
    13. ->>->>>
    14. e+[-
    15.  *eof
    16.                           e+>c,+[<e-]>[c>] <<e[-<-      >]
    17.  *plus
    18.  > c[<e++++++[->c-------<]e+>c--[<e-]>[c>]+<<e[-<++++   >]]>>[->]
    19.  *comma
    20.  <<c[<                    e+>c- [<e-]>[c>]+<<e[-<++++++ >]]>>[->]
    21.  *minus
    22.  <<c[<                    e+>c- [<e-]>[c>]+<<e[-<+++++  >]]>>[->]
    23.  *dot
    24.  <<c[<                    e+>c- [<e-]>[c>]+<<e[-<+++++++>]]>>[->]
    25.  *lt
    26.  <<c[<e++[->c-------<]    e+>c  [<e-]>[c>]+<<e[-<++     >]]>>[->]
    27.  *gt
    28.  <<c[<                    e+>c--[<e-]>[c>]+<<e[-<+++    >]]>>[->]
    29.  *bra
    30.  <<c[<e+++++[->c------<]    >c+      >    +<<e            ]>>[->]
    31.  *ket
    32.  <<c[<                    e+>c--[<e-]>[c>]+<<e[-<+      >]]>>[->]
    33.  *pipe(end of source)
    34.  <<c[<e+++++[->c------<]  e+>c- [<e-]>[c>]+<<e[-<-      >]]>>[->]
    35.  <+<c[c---[+]>e-<c]>[-<+<+>>]<<<+[->]->[e->c--->]<++
    36. ec]
    37. >>-<<<<<+[-<+]->>
    38. * execute
    39. +[-<
    40.  * case 0: bra
    41.  f    +>X      [      <->[->+<]]<[-->      +[->+]-
    42.   >>>f+<+<b[>>f->+[->>>>+]->>]>>[f->+[->>>>+]->>]+<
    43.   [>-<<<<<<+[-<<+]>>-]>[-<<<<<<+[-<<+]>>  >]
    44.   <<<->>[-
    45.    <<<+[-<<+]>>-
    46.    *[
    47.     +>>-
    48.     <X[-[*other
    49.      X+<<Y[-<+>]
    50.     ]>[*ket#
    51.      +<X+<-<+[-<<+]-
    52.      <<+[
    53.       ->>>+[->>+]>>-<<-<+[-<<+]-<
    54.       *sub*
    55.       -[++<-]<<+[[->+]>-<]>+[-->+[->+]>]<-
    56.       <+[-<+]
    57.      ]->+[->+]->+[->>+]
    58.      <Y[-<+>]>
    59.     ]<]>[*bra
    60.      <<<<-<+[-<<+]-
    61.      *add*
    62.      <[-<]+<+[[->+]>-<]>+[<<->>[->+]>]<-
    63.      >+[->>+]>Y[-<+>]>
    64.     ]
    65.     <<[->+<]
    66.    >>>>]
    67.    <<->+[->>+]->>
    68.   ]<<
    69.  <+[-<+]] >>[-<+<+>>]<<
    70.  * case 1: ket
    71.  f[[-]+>X-     [+     <->[->+<]]<[-->+     +[->+]-
    72.   >>>f+<+<b[>>f->+[->>>>+]->>]>>[f->+[->>>>+]->>]+<
    73.   [>-<<<<<<+[-<<+]>>-]>[-<<<<<<+[-<<+]>>-->]
    74.   <+<<->>[-
    75.    <<<+[-<<+]-
    76.    *[
    77.     +<<-
    78.     >X[-[*other
    79.      X+>>Y[->+<]
    80.     ]<[*ket
    81.      >X+<<+[-<<+]-
    82.      *add*
    83.      <[-<]+<+[[->+]>-<]>+[<<->>[->+]>]<-
    84.      >+[->>+]->>>Y[->+<]<
    85.     ]>]<[*bra
    86.      <+[-<<+]-
    87.      <<+[
    88.       ->>>+[->>+]>>+<<-<+[-<<+]-<
    89.       *sub*
    90.       -[++<-]<<+[[->+]>-<]>+[-->+[->+]>]<-
    91.       <+[-<+]
    92.      ]->+[->+]->+[->>+]
    93.      >>[-<<->>]>Y[->+<]<
    94.     ]
    95.     >>[-<+>]
    96.    <<<<]
    97.    ->+[->>+]->>
    98.   ]<<
    99.  <+[-<+]]]>>[-<+<+>>]<<
    100.  * case 2: lt
    101.  f[[-]+>X--    [++    <->[->+<]]<[-->++    +[->+]-
    102.   >>>f+<<b[
    103.    >>->+[->>>>+]>>>>-<<<<+[-<<<<+]
    104.   ]>>[
    105.    f>+[<f->[->>>>+]<<<<-<<<<+[-<<<<+]>>>f]
    106.    <[f->-<<<b+<+>>]
    107.   ]<<-
    108.  <+[-<+]]]>>[-<+<+>>]<<
    109.  * case 3: gt
    110.  f[[-]+>X---   [+++   <->[->+<]]<[-->+++   +[->+]-
    111.   >>>f+<<b[
    112.    >>>+[<f->[->>>>+]<<<<-<<<<+[-<<<<+]>>>f]
    113.    <[f->-<<<b-<+>>]<<
    114.   ]>>[
    115.    f->+[->>>>+]>>>>-<<<<+[-<<<<+]>>
    116.   ]<<-
    117.  <+[-<+]]]>>[-<+<+>>]<<
    118.  * case 4: plus
    119.  f[[-]+>X----  [++++  <->[->+<]]<[-->++++  +[->+]-
    120.   >>>f+< <b[>>f->+[->>>>+]->>]>>[f->+[->>>>+]->>] <
    121.   +
    122.   <<<<<+[-<<+]-
    123.  <+[-<+]]]>>[-<+<+>>]<<
    124.  * case 5: minus
    125.  f[[-]+>X----- [+++++ <->[->+<]]<[-->+++++ +[->+]-
    126.   >>>f+< <b[>>f->+[->>>>+]->>]>>[f->+[->>>>+]->>] <
    127.   -
    128.   <<<<<+[-<<+]-
    129.  <+[-<+]]]>>[-<+<+>>]<<
    130.  * case 6: comma
    131.  f[[-]+>X------[++++++<->[->+<]]<[-->+++++++[->+]-
    132.   >>>f+< <b[>>f->+[->>>>+]->>]>>[f->+[->>>>+]->>] <
    133.   ,
    134.   <<<<<+[-<<+]-
    135.  <+[-<+]]]>>[-<+<+>>]<<
    136.  * case 7: dot
    137.  f[[-]                             ->      +[->+]-
    138.   >>>f+< <b[>>f->+[->>>>+]->>]>>[f->+[->>>>+]->>] <
    139.   .
    140.   <<<<<+[-<<+]-
    141.  <+[-<+] ]
    142. >>>+]
    143.