Less 
例題
すべて開く すべて閉じる例 (2)
スコープ (9)
数値不等式 (7)
I < 03 / 2 < 5 / 3最高で二進法の最後8桁しか異ならない近似数は等しいとみなされる:
1. < 1. + 2 ^ 7 10 ^ -161. < 1. + 2 ^ 8 10 ^ -16N[Pi, 20] < PiN[Pi, 20] < Pi(1 + 2 ^ 12 10 ^ -20)2つの厳密な数式を比べる.数値テストは不等式の証明には十分かもしれない:
Pi ^ E < E ^ Pi不等式が成り立たないことの証明には記号的なメソッドが必要である:
Sqrt[2] + Sqrt[3] < Sqrt[5 + 2Sqrt[6]]Lessが使う記号・数値メソッドはこの不等式が成り立たないことの証明には不十分である:
Sqrt[2] + Sqrt[3] < Root[# ^ 4 - 10# ^ 2 + 1&, 4]RootReduceを使って代数的数の符号を決める:
RootReduce[%[[1]] - %[[2]]] < 0Lessが使う数値メソッドは次の不等式の証明に十分な精度ではない:
Sqrt[2] + Sqrt[3] < Root[# ^ 4 - 10# ^ 2 + 1&, 4] + 10 ^ -100
RootReduceは厳密なメソッドを使って不等式を証明する:
RootReduce[%[[1]] - %[[2]]] < 0$MaxExtraPrecisionの値を大きくすることでも,この不等式が証明できるかもしれない:
Block[{$MaxExtraPrecision = 100}, Sqrt[2] + Sqrt[3] < Root[# ^ 4 - 10# ^ 2 + 1&, 4] + 10 ^ -100]記号不等式 (2)
x が実数ではないかもしれないので,記号的な不等式は未評価で残される:
x < xRefineを使い,x が実数であると仮定してこの不等式を再評価する:
Refine[%, Element[x, Reals]]ineq = 1 < x ^ 2 + y ^ 2 < 2Reduceを使って解集合の明示的な記述を求める:
Reduce[ineq, {x, y}]FindInstanceを使って解の例を求める:
FindInstance[ineq, {x, y}]Minimizeを使って不等式で定義された範囲で最適化する:
Minimize[{x ^ 2 - y ^ 2, ineq}, {x, y}]Refineを使って不等式で定義された仮定の下で簡約する:
Refine[Sqrt[(2 - x ^ 2) ^ 2], ineq]特性と関係 (12)
2引数のLessの否定はGreaterEqualである:
Not[x < y]3引数のLessの否定は自動的には簡約されない:
Not[x < y < z]LogicalExpandを使って2引数のGreaterEqualについて表す:
LogicalExpand[%]これは3引数のGreaterEqualと等価ではない:
LogicalExpand[x ≥ y ≥ z]Lessが数式間の不等式を判断できない場合,その不等式は未評価で返される:
a = Log[Sqrt[2] + Sqrt[3]];
b = Log[5 + 2Sqrt[6]] / 2;
a < bFullSimplifyは厳密な記号変換を使って不等式が成り立たないことを証明する:
FullSimplify[%]Negative[x]は
と等価である:
Negative /@ {-1, 0, 1, I}Reduceを使って不等式を解く:
Reduce[x ^ 5 - 3x + 2 < 0, x]Reduce[y ^ 2 - 4x ^ 2 + 4x ^ 4 < 0, {x, y}]FindInstanceを使って解の例を求める:
FindInstance[y ^ 2 - 4x ^ 2 + 4x ^ 4 < -z ^ 2, {x, y, z}]RegionPlotとRegionPlot3Dを使って不等式の解集合を可視化する:
RegionPlot[y ^ 2 - 4x ^ 2 + 4x ^ 4 < 0, {x, -1, 1}, {y, -1, 1}]RegionPlot3D[y ^ 2 - 4x ^ 2 + 4x ^ 4 < -z ^ 2, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}]Refine[Sqrt[x ^ 2], x < 0]Limit[a ^ n, n -> Infinity, Assumptions -> -1 < a < 1]MinimizeとMaximizeを使って不等式によって制約された最適化問題を解く:
Minimize[{x - y, y ^ 2 - 4x ^ 2 + 4x ^ 4 < 0}, {x, y}]NMinimizeとNMaximizeを使って制約された最適化問題を数値的に解く:
NMinimize[{x - y, 1 < Tan[x] + Tan[y] < 2}, {x, y}]不等式の解集合上で関数を積分(Integrate)する:
Integrate[x ^ 2 Boole[1 < x ^ 2 + y ^ 2 < 2], {x, -Infinity, Infinity}, {y, -Infinity, Infinity}]Median,Quantile,Quartilesを
番目の最大数に使う:
{x1, x2, x3} = {1, 2, 3};x1 < x2 < x3Median[{x2, x3, x1}]考えられる問題 (3)
0.00001 < 2.00006 - 2.000052.00006 - 2.00005//InputForm0.00001`16 < 2.00006`16 - 2.00005`16自動精度追跡機能のお陰で,Lessには最初の10桁のみを見ればよいことが分かっている:
Precision[2.00006`16 - 2.00005`16]0.1 < 2.6 - 2.5この場合の余分な桁はLessによって無視される:
2.6 - 2.5//InputFormテクニカルノート
関連するガイド
-
▪
- 不等式 ▪
- 仮定と領域 ▪
- 数値関数 ▪
- 判定式 ▪
- 手続き型プログラミング
履歴
1988 で導入 (1.0) | 1996 で更新 (3.0)
テキスト
Wolfram Research (1988), Less, Wolfram言語関数, https://reference.wolfram.com/language/ref/Less.html (1996年に更新).
CMS
Wolfram Language. 1988. "Less." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 1996. https://reference.wolfram.com/language/ref/Less.html.
APA
Wolfram Language. (1988). Less. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/Less.html
BibTeX
@misc{reference.wolfram_2026_less, author="Wolfram Research", title="{Less}", year="1996", howpublished="\url{https://reference.wolfram.com/language/ref/Less.html}", note=[Accessed: 01-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_less, organization={Wolfram Research}, title={Less}, year={1996}, url={https://reference.wolfram.com/language/ref/Less.html}, note=[Accessed: 01-November-2026]}