Uno strano numero QUASI intero

/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/ /* [ Created with wxMaxima version 13.04.2 ] */ /* [wxMaxima: comment start ] Uno strano numero QUASI intero
Sia %e che %pi sono numeri trascendenti ma...

Scelgo qui di usare numeri in virgola mobile ma con
ben 48 cifre decimali significative !
   [wxMaxima: comment end   ] */

/* [wxMaxima: input   start ] */
fpprec:48$
print("Il numero e, la base dei logaritmi naturali:",
bfloat(%e))$ print("Tutti sanno cosa significa pigreco:",
bfloat(%pi))$
/* [wxMaxima: input   end   ] */

/* [wxMaxima: comment start ]
Notevole questo strano valore che, statisticamente
sarebbe improbabilissimo (24*10939058860032031)!
Una piccola radice primitiva di 10939058860032031 e' 3.
   [wxMaxima: comment end   ] */

/* [wxMaxima: input   start ] */
sembrintero:%e^(%pi*sqrt(163));bfloat(sembrintero);
quasiuguale:24*(380000000*28786997+32031);
print("Radice primitiva: ",zn_primroot(10939058860032031))$
/* [wxMaxima: input   end   ] */

/* [wxMaxima: comment start ]
Facendo la differenza ... l'intero e' quasi uguale
al numero trascendente !!!
   [wxMaxima: comment end   ] */

/* [wxMaxima: input   start ] */
bfloat(sembrintero-quasiuguale);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: comment start ]

[wxMaxima: comment end ] */ /* Maxima can't load/batch files which end with a comment! */ "Created with wxMaxima"$