ligo/src/test/contracts/expected/counter.religo

type storage = int;

let main = 
  (((p, s): (int, storage))): (list(operation), storage) => 
    ([] : list(operation), p + s);