ligo/src/test/contracts/counter.religo

type storage = int;

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