equal
deleted
inserted
replaced
776 done |
776 done |
777 |
777 |
778 lemma path_image_subpath: |
778 lemma path_image_subpath: |
779 fixes g :: "real \<Rightarrow> 'a::real_normed_vector" |
779 fixes g :: "real \<Rightarrow> 'a::real_normed_vector" |
780 shows "path_image(subpath u v g) = (if u \<le> v then g ` {u..v} else g ` {v..u})" |
780 shows "path_image(subpath u v g) = (if u \<le> v then g ` {u..v} else g ` {v..u})" |
|
781 by (simp add: path_image_subpath_gen closed_segment_eq_real_ivl) |
|
782 |
|
783 lemma path_image_subpath_commute: |
|
784 fixes g :: "real \<Rightarrow> 'a::real_normed_vector" |
|
785 shows "path_image(subpath u v g) = path_image(subpath v u g)" |
781 by (simp add: path_image_subpath_gen closed_segment_eq_real_ivl) |
786 by (simp add: path_image_subpath_gen closed_segment_eq_real_ivl) |
782 |
787 |
783 lemma path_subpath [simp]: |
788 lemma path_subpath [simp]: |
784 fixes g :: "real \<Rightarrow> 'a::real_normed_vector" |
789 fixes g :: "real \<Rightarrow> 'a::real_normed_vector" |
785 assumes "path g" "u \<in> {0..1}" "v \<in> {0..1}" |
790 assumes "path g" "u \<in> {0..1}" "v \<in> {0..1}" |