あ、すみません．嘘つきました． VAR B=A*0 出来ません．type mismatchでちゃう IF A*1.5==A && A*0==A*0 THEN RETURN "$" です！