Contents:
Library ConCert.Examples.BoardroomVoting.extract.ExtractBoardroomVotingLIGO
Extraction of the Boardroom voting contract CameLIGO
From MetaRocq.Template Require Import All.
From ConCert.Extraction Require Import CameLIGOExtract.
From ConCert.Extraction Require Import CameLIGOPretty.
From ConCert.Examples.BoardroomVoting Require Import BoardroomVotingExtractionCameLIGO.
#[local]
Existing Instance PrintConfShortNames.PrintWithShortNames.
Time MetaRocq Run (CameLIGO_prepare_extraction to_inline TT_remap TT_rename [] "cctx_instance" BV_MODULE).
Time Definition cameLIGO_boardroomvoting := Eval vm_compute in cameligo_boardroomvoting_prepared.
Redirect "cameligo-extract/BoardroomVoting.mligo"
MetaRocq Run (tmMsg cameLIGO_boardroomvoting).
From ConCert.Extraction Require Import CameLIGOExtract.
From ConCert.Extraction Require Import CameLIGOPretty.
From ConCert.Examples.BoardroomVoting Require Import BoardroomVotingExtractionCameLIGO.
#[local]
Existing Instance PrintConfShortNames.PrintWithShortNames.
Time MetaRocq Run (CameLIGO_prepare_extraction to_inline TT_remap TT_rename [] "cctx_instance" BV_MODULE).
Time Definition cameLIGO_boardroomvoting := Eval vm_compute in cameligo_boardroomvoting_prepared.
Redirect "cameligo-extract/BoardroomVoting.mligo"
MetaRocq Run (tmMsg cameLIGO_boardroomvoting).