Contract - VCGP

Address:

czen1qqqqqqqrw54zha5378cflx8lyel2xcgq9slewfnpzmuc2camepakjc9wvzga8dtw0

ID:

000000006ea5457ed23e3e13f31fe4cfd46c200587f2e4cc22df30ac77790f6d2c15cc12

open Zen.Types
open Zen.Base
open Zen.Cost
module RT = Zen.ResultT
module Tx = Zen.TxSkeleton
module C = Zen.Cost
let name = "Voting Contract"

let main txSkeleton _ contractId command sender messageBody wallet state =
  RT.ok @ {
    tx = txSkeleton;
    message = None;
    state = NoChange;
  }

let cf _ _ _ _ _ _ _ =
    5
    |> cast nat
    |> C.ret