Contract - T-VCGP

Address:

ctzn1qqqqqqq9x34g5hhuft2fjvzx8n3deyk8njaezwn88acp6azmym2dqthw9y5l977r7

ID:

00000000a68d514bdf895a932608c79c5b9258f39772274ce7ee03ae8b64da9a05ddc525

(* NAME_START:CGP Voting:NAME_END *)
    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