equal
deleted
inserted
replaced
48 |
48 |
49 operator < (z1, z2: hwFloat) b : boolean; |
49 operator < (z1, z2: hwFloat) b : boolean; |
50 operator > (z1, z2: hwFloat) b : boolean; |
50 operator > (z1, z2: hwFloat) b : boolean; |
51 |
51 |
52 function cstr(z: hwFloat): string; |
52 function cstr(z: hwFloat): string; |
53 function hwRound(t: hwFloat): integer; |
53 function hwRound(t: hwFloat): LongInt; |
54 function hwAbs(t: hwFloat): hwFloat; |
54 function hwAbs(t: hwFloat): hwFloat; |
55 function hwSqr(t: hwFloat): hwFloat; |
55 function hwSqr(t: hwFloat): hwFloat; |
56 function hwSqrt(t: hwFloat): hwFloat; |
56 function hwSqrt(t: hwFloat): hwFloat; |
57 function Distance(dx, dy: hwFloat): hwFloat; |
57 function Distance(dx, dy: hwFloat): hwFloat; |
58 function AngleSin(Angle: Longword): hwFloat; |
58 function AngleSin(Angle: Longword): hwFloat; |
229 cstr:= cstr + '.' + tmpstr |
229 cstr:= cstr + '.' + tmpstr |
230 end; |
230 end; |
231 if z.isNegative then cstr:= '-' + cstr |
231 if z.isNegative then cstr:= '-' + cstr |
232 end; |
232 end; |
233 |
233 |
234 function hwRound(t: hwFloat): integer; |
234 function hwRound(t: hwFloat): LongInt; |
235 begin |
235 begin |
236 if t.isNegative then hwRound:= -t.Round |
236 if t.isNegative then hwRound:= -t.Round |
237 else hwRound:= t.Round |
237 else hwRound:= t.Round |
238 end; |
238 end; |
239 |
239 |