|
|
@@ -0,0 +1,27 @@
|
|
|
1
|
+clc
|
|
|
2
|
+%tic;pkg install -forge symbolic;fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);%
|
|
|
3
|
+
|
|
|
4
|
+try
|
|
|
5
|
+ try
|
|
|
6
|
+
|
|
|
7
|
+ tic;digits(2^15-2);fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);
|
|
|
8
|
+
|
|
|
9
|
+ tic
|
|
|
10
|
+ vpa(1)...
|
|
|
11
|
+ /...
|
|
|
12
|
+ vpa(84.406022589954030768899117092091000289089388918088900852079)...
|
|
|
13
|
+ *...
|
|
|
14
|
+ vpa(3)...
|
|
|
15
|
+ ^...
|
|
|
16
|
+ vpa(9)
|
|
|
17
|
+ fprintf(1,['%.' num2str(2^6) 'f.\n'],toc)
|
|
|
18
|
+ catch ME
|
|
|
19
|
+ tic;pkg load symbolic;fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);
|
|
|
20
|
+ end
|
|
|
21
|
+
|
|
|
22
|
+
|
|
|
23
|
+ catch ME
|
|
|
24
|
+ tic;fprintf(['%.' num2str(2^6) 'f\n'], 1 / 84.406022589954030768899117092091000289089388918088900852079 * 3^9);fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);
|
|
|
25
|
+
|
|
|
26
|
+
|
|
|
27
|
+end
|