src/HOL/MicroJava/J/Conform.thy
changeset 12888 f6c1e7306c40
parent 12517 360e3215f029
child 12911 704713ca07ea
     1.1 --- a/src/HOL/MicroJava/J/Conform.thy	Thu Feb 14 11:50:52 2002 +0100
     1.2 +++ b/src/HOL/MicroJava/J/Conform.thy	Thu Feb 14 12:06:07 2002 +0100
     1.3 @@ -238,7 +238,7 @@
     1.4  done
     1.5  
     1.6  lemma lconf_ext_list [rule_format (no_asm)]: 
     1.7 -  "G,h\<turnstile>l[::\<preceq>]L ==> \<forall>vs Ts. nodups vns --> length Ts = length vns --> 
     1.8 +  "G,h\<turnstile>l[::\<preceq>]L ==> \<forall>vs Ts. distinct vns --> length Ts = length vns --> 
     1.9    list_all2 (\<lambda>v T. G,h\<turnstile>v::\<preceq>T) vs Ts --> G,h\<turnstile>l(vns[\<mapsto>]vs)[::\<preceq>]L(vns[\<mapsto>]Ts)"
    1.10  apply (unfold lconf_def)
    1.11  apply( induct_tac "vns")