diff options
Diffstat (limited to 'buch/chapters/030-geometrie/trigo')
| -rw-r--r-- | buch/chapters/030-geometrie/trigo/3.bc | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/buch/chapters/030-geometrie/trigo/3.bc b/buch/chapters/030-geometrie/trigo/3.bc index 2ee9026..68f1583 100644 --- a/buch/chapters/030-geometrie/trigo/3.bc +++ b/buch/chapters/030-geometrie/trigo/3.bc @@ -258,3 +258,25 @@ c43 c44 c45 +s005=sqrt(0.5-0.5*c01) +c005=sqrt(0.5+0.5*c01) + +s=s005/5 +c=sqrt(1-s*s) + +s=s-(((16*s*s-20)*s*s+5)*s-s005)/(((80*s*s-60)*s*s)+5) +s=s-(((16*s*s-20)*s*s+5)*s-s005)/(((80*s*s-60)*s*s)+5) +s=s-(((16*s*s-20)*s*s+5)*s-s005)/(((80*s*s-60)*s*s)+5) +s=s-(((16*s*s-20)*s*s+5)*s-s005)/(((80*s*s-60)*s*s)+5) +s=s-(((16*s*s-20)*s*s+5)*s-s005)/(((80*s*s-60)*s*s)+5) +s=s-(((16*s*s-20)*s*s+5)*s-s005)/(((80*s*s-60)*s*s)+5) +s001=s + +c=c-((((16*c*c-20)*c*c)+5)*c-c005)/(((80*c*c-60)*c*c)+5) +c=c-((((16*c*c-20)*c*c)+5)*c-c005)/(((80*c*c-60)*c*c)+5) +c=c-((((16*c*c-20)*c*c)+5)*c-c005)/(((80*c*c-60)*c*c)+5) +c=c-((((16*c*c-20)*c*c)+5)*c-c005)/(((80*c*c-60)*c*c)+5) +c=c-((((16*c*c-20)*c*c)+5)*c-c005)/(((80*c*c-60)*c*c)+5) +c=c-((((16*c*c-20)*c*c)+5)*c-c005)/(((80*c*c-60)*c*c)+5) +c001=c + |