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=3c757d760e9af5c84f56e8e3e4cc69eb85721d7c;hpb=e934f979236c43e098be7b500e7bc11103911630 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