author | paulson <lp15@cam.ac.uk> |
Fri, 02 Jul 2021 20:39:15 +0100 | |
changeset 73926 | 5f71c16f0b37 |
parent 73925 | a0024852e699 |
child 73927 | 5b5e015189a4 |
--- a/src/HOL/Nonstandard_Analysis/NSComplex.thy Fri Jul 02 15:54:41 2021 +0100 +++ b/src/HOL/Nonstandard_Analysis/NSComplex.thy Fri Jul 02 20:39:15 2021 +0100 @@ -45,7 +45,7 @@ where "hsgn = *f* sgn" definition harg :: "hcomplex \<Rightarrow> hypreal" - where "harg = *f* arg" + where "harg = *f* Arg" definition \<comment> \<open>abbreviation for \<open>cos a + i sin a\<close>\<close> hcis :: "hypreal \<Rightarrow> hcomplex"