aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

September Morn Update

Browse source
This commit is contained in:
Ingy döt Net 2019-09-12 10:33:56 -07:00
parent 4e2d22a71d
commit aac6731f2c
6856 changed files with 141342 additions and 21127 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Task/Variable-size-Set/Phix/variable-size-set.phix Normal file
View file

@ -0,0 +1,7 @@
include mpfr.e -- requires 0.8.0+
string nines = repeat('9',1001) -- +1 for the "3."
mpz ndp = mpz_init(nines) -- mpz_init(nines,3326) would be identical
integer precision = mpz_sizeinbase(ndp,2) -- 3326
mpfr pi = mpfr_init(0,precision) -- or just hard-code that 3326
mpfr_const_pi(pi)
mpfr_printf(1,"PI with 1000 decimals: %.1000RDf\n\n",pi)