generalized type
authornipkow
Tue, 11 May 2021 22:40:59 +0200
changeset 73931 78929c029785
parent 73930 0d79ac2eb106
child 73935 71c45d60a90a
generalized type
src/HOL/Library/AList.thy
--- a/src/HOL/Library/AList.thy	Tue May 11 18:56:33 2021 +0100
+++ b/src/HOL/Library/AList.thy	Tue May 11 22:40:59 2021 +0200
@@ -475,7 +475,7 @@
 
 subsection \<open>\<open>map_ran\<close>\<close>
 
-definition map_ran :: "('key \<Rightarrow> 'val \<Rightarrow> 'val) \<Rightarrow> ('key \<times> 'val) list \<Rightarrow> ('key \<times> 'val) list"
+definition map_ran :: "('key \<Rightarrow> 'val1 \<Rightarrow> 'val2) \<Rightarrow> ('key \<times> 'val1) list \<Rightarrow> ('key \<times> 'val2) list"
   where "map_ran f = map (\<lambda>(k, v). (k, f k v))"
 
 lemma map_ran_simps [simp]: