「Minusp」の版間の差分

2015年9月18日 (金) 14:37時点における最新版

引数

(minusp -2.4)
T
; ---
(minusp 8.5)
nil

(minusp -26)
T

(setq num 3)
3

(minusp num)
nil

@@ 1行目: / 1行目: @@
+{{AutoLISP}}
 ; 構文
 : (minusp ''num'')
@@ 5行目: / 7行目: @@
 ; 機能
 : 数値が負かどうかを調べる。
 ; 引数
 :* num  数値。
 ; 戻り値
 : number 引数が負の場合は T、
 : それ以外の場合は nil。
 * plusp プラスかどうかを返すは autolisp にはない。[[zerop]] との組み合わせで判断出来るってことで。
 ; サンプル
-: (minusp -2.4)
-: '''T'''
+<pre class="brush:autolisp;">
-: ---
+(minusp -2.4)
-: (minusp 8.5)
+T
-: '''nil'''
+; ---
-: ---
+(minusp 8.5)
-: (minusp -26)
+nil
-: '''T'''
-: ---
+(minusp -26)
-: (setq num 3)
+T
-: '''3'''
-: ---
+(setq num 3)
-: (minusp num)
-: '''nil'''
+(minusp num)
+nil
+</pre>
 -----