X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fcasl2lib%2Fabs.casl;h=be0b9220f54cb9b79c2db6292f9b416e8227cb7a;hp=35aa20d9b87515dbcaa5b68369dcd82d912fc82a;hb=bf31ea99380e3ee2198f61f6510ebe6e4a3961f5;hpb=58ee37be62a5e359d0f6eb603cc86b5692f74b90 diff --git a/as/casl2lib/abs.casl b/as/casl2lib/abs.casl index 35aa20d..be0b922 100644 --- a/as/casl2lib/abs.casl +++ b/as/casl2lib/abs.casl @@ -1,5 +1,5 @@ -;;; GR1を絶対値に変換する -;;; 入力 GR1:-32768〜32767の整数 +;;; GR1を符号付き整数とみなし、絶対値に変換 +;;; 入力 GR1:-32768から32767の整数 ;;; 出力 GR1:入力された整数の絶対値 ;;; OF:入力されたGR1が-32768の場合、1 ;;; SF:入力されたGR1が負数(-32767〜-1)の場合、1