src/HOL/Real/RealAbs.thy
changeset 12018 ec054019c910
parent 11701 3d51fbf81c17
child 14265 95b42e69436c
equal deleted inserted replaced
12017:78b8f9e13300 12018:ec054019c910
     7 
     7 
     8 RealAbs = RealArith +
     8 RealAbs = RealArith +
     9 
     9 
    10 
    10 
    11 defs
    11 defs
    12   real_abs_def "abs r == (if (Numeral0::real) <= r then r else -r)"
    12   real_abs_def "abs r == (if (0::real) <= r then r else -r)"
    13 
    13 
    14 end
    14 end