let labels_stmt_spec before_after s = if before_after then (* before -> requires/assume *) labels_spec_pre s else (* after -> ensures *) labels_spec_post s