X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Fcasl2lib%2Fabs.casl;h=be0b9220f54cb9b79c2db6292f9b416e8227cb7a;hb=9a90bce10b932f8aa7045b9dceb4b99156666920;hp=35aa20d9b87515dbcaa5b68369dcd82d912fc82a;hpb=24f3ed4394bc3d9bfe2f387f91e0b7f41ec8555e;p=YACASL2.git 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