anchor.diff:      Postfix;
   shunting_yard([], OpS, Postfix) ->
       Postfix ++ OpS;
  -shunting_yard([{_,{_,_}}=Op|Rest], [], Postfix) ->
  +shunting_yard([{_,{_,_},_}=Op|Rest], [], Postfix) ->
       shunting_yard(Rest, [Op], Postfix);
   shunting_yard([open|Rest], OpS, Postfix) ->
       shunting_yard(Rest, [open|OpS], Postfix);
  
positive.code: add_line(#array_element{}=A, {_,R,C}) ->
      A#array_element{line={{line,R},{column,C}}};
  add_line(#for{}=F, {_,R,C}) -> F#for{line={{line,R},{column,C}}};
  add_line(#while{}=W, {_,R,C}) -> W#while{line={{line,R},{column,C}}}.
  
  remove_spaces(<<SP:8,Rest/binary>>, Pos) when ?IS_SPACE(SP) ->
  
negative.code: add_line(#variable{}=V, {_,R,C}) -> V#variable{line={{line,R},{column,C}}};
  add_line(#constant{}=O, {_,R,C}) -> O#constant{line={{line,R},{column,C}}};
  add_line(#int{}=I, {_,R,C}) -> I#int{line={{line,R},{column,C}}};
  add_line(#float{}=F, {_,R,C}) -> F#float{line={{line,R},{column,C}}};
  add_line(#text_to_process{}=T, {_,R,C}) ->
      T#text_to_process{line={{line,R},{column,C}}};
  add_line(#text{}=T, {_,R,C}) -> T#text{line={{line,R},{column,C}}};
  