xxq250/Nasal-Interpreter
1
0
Fork 1
mirror of https://github.com/ValKmjolnir/Nasal-Interpreter.git synced 2026-07-26 21:08:45 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

update&bugs fixed

Browse Source
This commit is contained in:
Valk Richard Li
2019-11-16 00:34:30 +08:00
committed by GitHub
parent 2530a59bd5
commit 24589e5493
6 changed files with 136 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files
balloon/lib/math.nas
+37 -3
View File
@@ -1,18 +1,21 @@
var pi=3.14159265358979;
var abs=func(__x)
{
if(__x>0){return __x;}
else{return -__x;}
};
var asr=func(__x,__y)
var __balloon_lib_ln_asr=func(__x,__y)
{
if(abs(__y-__x)<=0.1){return (1/__x+8/(__x+__y)+1/__y)*(__y-__x)/6;}
var __mid=(__x+__y)/2;
return asr(__x,__mid)+asr(__mid,__y);
return __balloon_lib_ln_asr(__x,__mid)+__balloon_lib_ln_asr(__mid,__y);
};
var ln=func(_x)
{
return asr(1,_x);
return __balloon_lib_ln_asr(1,_x);
};
var log=func(__a,__x)
@@ -63,3 +66,34 @@ var relu=func(__x)
if(x>=0){return __x;}
else{return 0;}
};
var sin=func(__x)
{
if(__x<0){return -1*sin(-__x);}
var fl=1;
while(__x>2*pi){__x-=2*pi;}
if(__x>pi){__x-=2*pi;}
elsif(__x<-pi){__x+=2*pi;}
if(__x>pi/2){__x-=pi;fl*=-1;}
elsif(__x<-pi/2){__x+=pi;fl*=-1;}
if(__x>pi/4){return cos(pi/2-__x);}
else{return fl*(__x*(1-__x*__x*(1/6+__x*__x*(1/120-__x*__x*(1/5040+__x*__x/362880)))));}
};
var cos=func(__x)
{
__x=abs(__x);
var fl=1;
while(__x>2*pi){__x-=2*pi;}
if(__x>pi){__x-=2*pi;}
elsif(__x<-pi){__x+=2*pi;}
if(__x>pi/2){__x-=pi;fl*=-1;}
elsif(__x<-pi/2){__x+=pi;fl*=-1;}
if(__x>pi/4){return sin(pi/2-__x);}
else{return fl*(1-__x*__x*(1/2+__x*__x*(1/24-__x*__x*(1/720+__x*__x/40320))));}
};
var tan=func(__x)
{
return sin(__x)/cos(__x);
};