Operator.hs

data Roletype = Citizen | HealthClinic | StateHealthAgency | InsuranceCompany
 deriving (Eq, Show)
 
template Network
 with
  operator : Party
 where
  signatory operator
 
 
  controller operator can
   nonconsuming InviteParty : ContractId PartyInvitation
     with
       party : Party
       roletype : Roletype
 
     do
       create PartyInvitation with party, operator, roletype