$inc fvmstd.fp

proc main
  :getint
  0 2 i- i+
  :putint
  :newline
endproc