fact: Definition label (lbl:Label) (stmt:STATEMENT.t) : STATEMENT.t := STATEMENT.Build_t (STATEMENT.pc stmt) (Some lbl) (STATEMENT.type stmt).
imports: Coq(List) JML(ListHelpers) JML(JMLExpressionNotations) JML(JMLProgramPlusImpl)