Goal:
  
  G1 : t
  G2 : t
  __view_subject_4_ : VSet.Subset (V G1) (V G2)
  __view_subject_5_ : EdgeSet.Subset (E G1) (E G2)
  __view_subject_6_ : s G1 = s G2
  h : VSet.For_all
        (fun x : VSet.elt =>
         VSet.for_all (fun y : VSet.elt => lsp G1 x y == lsp G2 x y) (V G1) =
         true) (V G1)
  v1 : VSet.elt
  v2 : VSet.elt
  inv1 : VSet.In v1 (V G1)
  inv2 : VSet.In v2 (V G1)
  ============================
   ((lsp G1 v1 v2 == lsp G2 v1 v2) = true ->
    (lsp G2 v1 v2 <= lsp G1 v1 v2)%nbar)


DEBUG:Going to execute:
<coq-core.plugins.ssreflect::ssrmove@1> $1 $2
DEBUG LTAC Evaluated term: (h v1 inv1)
DEBUG LTAC Evaluated term: VSet.for_all_spec
DEBUG LTAC Evaluated term: (iffLR
                              (Q:=VSet.For_all
                                    (fun x : VSet.elt =>
                                     (fun y : VSet.elt =>
                                      lsp G1 v1 y == lsp G2 v1 y) x = true)
                                    (V G1))
                              (VSet.for_all_spec (V G1)
                                 (f:=fun y : VSet.elt =>
                                     lsp G1 v1 y == lsp G2 v1 y) 
                                 ?p) _view_subject_)
DEBUG LTAC Evaluated term: (iffLR
                              (Q:=VSet.For_all
                                    (fun x : VSet.elt =>
                                     (fun y : VSet.elt =>
                                      lsp G1 v1 y == lsp G2 v1 y) x = true)
                                    (V G1))
                              (VSet.for_all_spec (V G1)
                                 (f:=fun y : VSet.elt =>
                                     lsp G1 v1 y == lsp G2 v1 y) 
                                 ?p) _view_subject_ v2 inv2)