Contract - M-VCGP
Address:
ID:

SUMMARY
FULL NAMETesting Voting CGP
STATUSInactive
TRANSACTIONS0
LAST ACTIVATION BLOCK288,730
BALANCES
ASSETAMOUNT
    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