代码之家 › 专栏 › 技术社区 › Mat Kelly

核心OCAML中浮点数的绝对值

absolute-value ocaml floating-point

Mat Kelly · 技术社区 · 17 年前

我需要一个OCAML中的浮点的绝对值函数,而核心语言似乎不具备该函数,所以我写了以下内容:

let absF (f:float) = if f > 0.0 then f else (f *. -1.0);;

这似乎适用于积极因素,但不适用于消极因素,理由如下:

此表达式的类型为float->float,但此处与int类型一起使用

我的逻辑错误是什么?

3 回复 | 直到 10 年前

newacct 14 年前

当你打字的时候

absF -1.0;;

OCAML解释为

(absF) - (1.0);;

即减法。相反,做

absF (-1.0);;

nlucaroni 15 年前

核心语言确实有一种, abs_float .

此外,您还可以使用 ~-. 表示一元负,这同样适用于整数 ~- 操作员。您可以这样定义这样的运算符(即使它已经存在):

let (~-) a : int = 0 - a
let (~-.) a : float = 0.0 -. a

daniele3004 10 年前

如果您有int值,可以使用

# abs(-1)
- : int = 1

如果你有浮球

# abs_float(-1.0)
- : float = 1.

推荐文章

Leo · 为什么carg(-0)返回-pi?

1 年前

Fyodor · 在C中使用sin和cos计算数学表达式不正确?

2 年前

Alexander · 为什么数字的输出不同?

2 年前

Wasabi Thumbs · 是否可以按MSB对IEEE754浮点进行排序?

2 年前

Ronny · 如何防止程序返回“inf”?

2 年前

r.e.s. · 在Python中,什么表达式等效于“0x1.0p-53”?

2 年前

EMS · 为什么双重打印的值与C中的浮点值相同,而它们的大小不同?

2 年前

Dakolas · 对python十进制库感到困惑

2 年前

beautiful-life · 显示带scanf和不带scanf的双变量

2 年前

RTC222 · 无法获取vrndscalepd的正确舍入模式代码

2 年前