"-------------------------------------------------" f_precision=10 config; "long --------------------------------------------" 10+20; "long --------------------------------------------" 1+2; 2*999999; -1; "double ------------------------------------------" -1.0; -1.; .1; 0.1234567890123456789; 2.222*999999.78; -1.01; 1.1e-5; 2.e-4; 2e-4; "-------------------------------------------------" (20+20)*(2+2)*(45+3*(12-2)/3); "-------------------------------------------------" (30+20+2)*(11/2*(12-(12+22+(3*4)+56/2+(11/2+(2+3)+34)*exp)*8)*PI); (30+20+2)*(-11/2*(-12-(12+22+(-3*-4)+56/-2+(11/-2+(2+3)+34)*-exp)*-8)*-PI); (((((0.01+0.02)*10)*10)*10)*(pi*exp)*10); (((((99999+0.9999999999)/3)/3)/3)/3); (((99999+0.9999999999)/3)*7); (((-99999-0.9999999999)/-3)*-7); "-------------------------------------------------" echo("f_precision = "); f_precision=10; (0.1+.02+.003)*(1e-5+2.e-4+3e-3)*(345.123/34.12+(-4*(1.2-4.1999999999/(1.2+0.8)))-11.0-2+1); pi exp gamma phi "-------------------------------------------------" echo("f_precision = "); f_precision=15; (0.1+.02+.003)*(1e-5+2.e-4+3e-3)*(345.123/34.12+(-4*(1.2-4.1999999999/(1.2+0.8)))-11.0-2+1); pi exp gamma phi "-------------------------------------------------" echo("f_precision = "); f_precision=20; (0.1+.02+.003)*(1e-5+2.e-4+3e-3)*(345.123/34.12+(-4*(1.2-4.1999999999/(1.2+0.8)))-11.0-2+1); pi exp gamma phi "-------------------------------------------------" f_precision=10 "sin cos -----------------------------------------" sin(pi); cos(pi); tan(0); sin(pi/2)+cos(pi/2); sin(pi/7)+cos(pi/7); pow_^2(sin(pi/2))+pow_^2(cos(pi/2)); pow_^2(sin(pi/7))+pow_^2(cos(pi/7)); "tan ---------------------------------------------" tan(0); tan(pi/7); tan(pi); "tan atan ----------------------------------------" atan(tan(0)); atan(tan(pi/4)); atan(tan(pi/7)); atan(tan(pi)); "tan atan ----------------------------------------" PI/7.0; atan(tan(pi/7)); "sin cos asin acos -------------------------------" pi/2; pi/4; sin(0); sin(pi/2); sin(pi); cos(0); cos(pi/2); cos(pi); acos(0); acos(1); asin(1); asin(0); sin(pi/4); cos(pi/4); asin(sin(pi/4)); acos(cos(pi/4)); "deg2rad rad2deg --------------------------------" pi/2; pi/4; deg2rad(90); rad2deg(pi/2); deg2rad(90/2); rad2deg(pi/4); "grad2rad rad2grad -------------------------------" grad2rad(100); rad2grad(pi/2); grad2rad(100/2); rad2grad(pi/4); "deg2grad grad2deg -------------------------------" deg2grad(0.0) deg2grad(30.0) deg2grad(90.0) deg2grad(100.0) deg2grad(180.0) grad2deg(0.0) grad2deg(33.3333333333) grad2deg(100.0000000000) grad2deg(111.1111111111) grad2deg(200.0000000000) "rad ---------------------------------------------" rad; sin(pi/2) cos(pi/2) tan(pi) "deg ---------------------------------------------" deg; sin(90.) cos(90.) tan(180.0) "grad---------------------------------------------" grad; sin(100.) cos(100.) tan(200.0) "rad ---------------------------------------------" a_unit=rad; sin(pi/2) cos(pi/2) tan(pi) "deg ---------------------------------------------" a_unit=deg; sin(90.) cos(90.) tan(180.0) "grad---------------------------------------------" a_unit=grad; sin(100.) cos(100.) tan(200.0) "-------------------------------------------------"