| afterdeclassifyCCD4ASM-CreditCardCenterCmd# (a; s) { if s(state(`state4'), a .to) ≠ null then let agl = s(state(`state4'), a .to) .msg .agentlist in { s(state(`state4'), a .to) := null ; s(Mailbox(DeclassifiedCCD-TravelPlannerCmd), mkTravelPlanner(a .to .id)) := wrapMessage2Data (mkMessage (agl, mkDeclassifiedCCD (s(locVar(`ccd_decl'), a .to) .CreditCardDetails))) } } |