설명

이 예제 프로그램은 특수 정의를 테스트하고 보여줍니다.
(미친) 가치. 모든 슬롯 게임 작업은 닫힌 상태에서 정의됩니다.
-infinity(-INF)에서 +infinity(INF)까지의 간격 및 기타 세 가지 간격
특수 값: 엡실론(EPS), 누락(NA) 및 정의되지 않음(UNDF).

소형 모델 유형 :슬롯 게임

카테고리 : 슬롯 게임 모델 라이브러리

메인 파일 : crazy.gms

$title 확장 산술의 예(CRAZY,SEQ=67)

$onText
이 예제 프로그램은 특수 정의를 테스트하고 보여줍니다.
(미친) 가치. 모든 슬롯 게임 작업은 닫힌 상태에서 정의됩니다.
-infinity(-INF)에서 +infinity(INF)까지의 간격 및 기타 세 가지 간격
특수 값: 엡실론(EPS), 누락(NA) 및 정의되지 않음(UNDF).

슬롯 게임 Development Corporation, 공식화 및 언어 예제.

키워드: 슬롯 게임 산술, 슬롯 게임 언어 기능
$offText

* "따옴표" 라벨에는 모든 문자를 사용할 수 있습니다.
op1 / minus-inf, "-4.000", 0, "+2.500" 설정
          plus-inf , 엡실론 , 누락, 정의되지 않음 /;

별칭(op1,op2);

* UNDF 값은 입력할 수 없으며 불법적인 방법으로만 생성됩니다.
* 아래 그림과 같이 작업
매개변수 a(op1) / minus-inf -inf, "-4.000" -4 , 0 0, "+2.500" 2.5
                   plus-inf +inf, 엡실론 EPS, 누락된 na /;

a("정의되지 않음") = 0/0;
디스플레이 a;

매개변수
   b(op1,op2) '피연산자 1 더하기 피연산자 2: o1 + o2'
   c(op1,op2) '피연산자 1 - 피연산자 2: o1 - o2'
   d(op1,op2) '피연산자 1의 거듭제곱 피연산자 2: o1 ** o2 (o2는 실수임)'
   e(op1,op2) '피연산자 1 곱하기 피연산자 2: o1 * o2'
   f(op1,op2) '피연산자 1을 피연산자 2로 나눈 값: o1 / o2'
   g(op1,op2) '피연산자 1 = 피연산자 2: o1 = o2'
   h(op1,op2) '피연산자 1 <= 피연산자 2: o1 <= o2'
   i(op1,op2) '피연산자 1 >= 피연산자 2: o1 >= o2'
   j(op1,op2) '피연산자 1 <> 피연산자 2: o1 <> o2'
   k(op1,op2) '피연산자 1 < 피연산자 2: o1 < o2'
   l(op1,op2) '피연산자 1 > 피연산자 2: o1 > o2'
   m(op1,op2) '피연산자 1 또는 피연산자 2: o1 또는 o2'
   n(op1,op2) '피연산자 1 및 피연산자 2: o1 및 o2'
   o(op1,op2) '피연산자 1 xor 피연산자 2: o1 xor o2'
   p(op1,op2) '피연산자 1의 거듭제곱 피연산자 2: o1 ** o2 (o2는 정수)'
   q(op1,op2) '피연산자 1, 피연산자 2의 최대값: max(o1,o2)'
   r(op1,op2) '피연산자 1, 피연산자 2의 최소값: min(o1,o2)'
   r1(op1,op2) '평균이 o1이고 std가 o2인 정규 난수: Normal(o1,o2)'
   s(op1,op2) '피연산자 1의 mod, 피연산자 2: mod(o1,o2)'
   t(op1,op2) '인수 1을 인수 2자리로 반올림: round(o1,o2)'
   t1(op1,op2) 'o1과 o2 사이의 균일한 난수: 균일(o1,o2)'
   u(op1,op2) '오른쪽의 달러 컨트롤: u = o1$o2'
   v(op1,op2) '왼쪽의 달러 컨트롤: v$o2 = o1'
   aa(*,op1) '단일 인수 함수';

스칼라
   looptest '루프에서 $-컨트롤을 테스트합니다'
   sumtest '합계 연산에 대한 $-제어 테스트'
   sumt '합계 테스트'
   prot '프로드 테스트'
   민트 '스민 테스트'
   maxt 'smax 테스트';

b(op1,op2) = a(op1) + a(op2);
c(op1,op2) = a(op1) - a(op2);
d(op1,op2) = a(op1)**a(op2);
p(op1,op2) = 전력(a(op1),a(op2));
e(op1,op2) = a(op1)*a(op2);
f(op1,op2) = a(op1)/a(op2);
g(op1,op2) = a(op1) = a(op2);
h(op1,op2) = a(op1) <= a(op2);
i(op1,op2) = a(op1) >= a(op2);
j(op1,op2) = a(op1) <> a(op2);
k(op1,op2) = a(op1) < a(op2);
l(op1,op2) = a(op1) > a(op2);
m(op1,op2) = a(op1) 또는 a(op2);
n(op1,op2) = a(op1) 및 a(op2);
o(op1,op2) = a(op1) xor a(op2);
q(op1,op2) = max(a(op1),a(op2));
r(op1,op2) = min(a(op1),a(op2));
r1(op1,op2)= 일반(a(op1),a(op2));
s(op1,op2) = mod(a(op1),a(op2));
t(op1,op2) = round(a(op1),a(op2));
t1(op1,op2)= 균일(a(op1),a(op2));
u(op1,op2) = a(op1)$a(op2);
v(op1,op2)$a(op2) = a(op1);

aa("절대", op1) = ABS(a(op1));
aa("arctan", op1) = arctan(a(op1));
aa("천장", op1) = 천장(a(op1));
aa("cos", op1) = cos(a(op1));
aa("바닥", op1) = 바닥(a(op1));
aa("errorf", op1) = errorf(a(op1));
aa("지수", op1) = exp(a(op1));
aa("loge", op1) = log(a(op1));
aa("log10", op1) = log10 (a(op1));
aa("사인", op1) = 죄(a(op1));
aa("부호", op1) = 부호(a(op1));
aa("squareroot",op1) = sqrt(a(op1));
aa("사각형", op1) = sqr(a(op1));
aa("mapval", op1) = mapval(a(op1));
aa("truncate", op1) = trunc(a(op1));
aa("not", op1) = a(op1)가 아님;

a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,d,p,q,r,r1,s,t,t1,u,v,aa를 표시합니다.

루프테스트 = 0;
loop(op1$a(op1), looptest = looptest + 10**(ord(op1) - 1));

sumtest = sum(op1$a(op1), 10**(ord(op1) - 1));
합계 = 합계(op1, a(op1));
prot = prod(op1, a(op1));
민트 = smin(op1, a(op1));
maxt = smax(op1, a(op1));

옵션 소수 = 0;
looptest, sumtest, sumt, prot, mint, maxt를 표시합니다.

execError = 0;