pub open spec fn lift_state_prime<T>(state_pred: StatePred<T>) -> TempPred<T>
{ TempPred::new(|ex: Execution<T>| state_pred.apply(ex.head_next())) }