설명
rpower(x,y) = x**y 이 점은 "쉬운" 점입니다. 즉, 어떤 것도 있어서는 안 됩니다. 모든 입력의 크기가 적당하므로 예외입니다.
소형 모델 유형 :슬롯 무료체험
카테고리 : 슬롯 무료체험 테스트 라이브러리
메인 파일 : fnrpow.gms 포함: fnset_xy.inc[html] fntest_xy.inc[html]
$title 'rpower 내장의 정확성 테스트' (FNRPOW,SEQ=194)
* rpower(x,y) = x**y
* 이 점은 "쉬운" 점입니다. 즉, 아무 것도 없어야 합니다.
* 모든 입력의 크기가 적당하므로 예외입니다.
$include fnset_xy.inc
$gdxIn fnrpow
$load aeps 담당자 relToInput T 데이터
$gdxIn
* Delphi 수학 라이브러리의 범위를 좁히기 위해 GDX 파일의 해킹, 담당자
담당자 = 담당자 * 2;
* GDX 버그 해킹
relToInput = max(0,relToInput);
data(T,'fxy_') = data(T,'fxy_');
루프 T,
data(T, 'f') = rpower.value( data(T,'x'),data(T,'y'));
data(T, 'fx') = rpower.grad(1: data(T,'x'),data(T,'y'));
data(T, 'fy') = rpower.grad(2: data(T,'x'),data(T,'y'));
data(T,'fxx') = rpower.hess(1:1:data(T,'x'),data(T,'y'));
data(T,'fxy') = rpower.hess(1:2:data(T,'x'),data(T,'y'));
data(T,'fyx') = rpower.hess(2:1:data(T,'x'),data(T,'y'));
data(T,'fyy') = rpower.hess(2:2:data(T,'x'),data(T,'y'));
data(T, 'rc') = mathlastrc;
data(T, 'ec') = mathlastec;
;
relToInput을 표시;
$include fntest_xy.inc