fact: Structure abs_pts x pts_A (pts_v : pts_A) pts_r := AbsPts { pts_h :> pack_heap; _ : pack_h pts_h = x :-> pts_v :+ pts_r }.
imports: mathcomp(ssreflect ssrfun ssrbool ssrnat seq eqtype) LemmaOverloading(prelude prefix heaps terms)