use bigint (gelöst) (Fragen zu Perl-Modulen) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Fragen zu Perl-Modulen

2025-12-02 19:38:33
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online
9 Gäste

[thread]20684[/thread]

submit to reddit

use bigint [gelöst]

[gelöst]

Tags: perl5 Ähnliche Threads

Leser: 15

Articles: hide open all | hide show old branches

+11 replies
rosti

2019-10-21 17:20
User since
2011-03-19
3751 Artikel
BenutzerIn
Code
Code (perl): (dl )

1 2 3 4 5 6 7 8 9

sub log2 { my $n = shift; return log($n)/log(2); } use bigint; puts log2 2**256; # infinity no bigint; puts log2 2**256; # 256
Das Verhalten verstehe ich nicht. Ich hätte es genau umgekehrt erwartet.

Warum ist das so ?

Bitte mal um Hinweises ;)

.
https://www.rolfrost.de/

Forum zu Fragen unserer Zeit
- +2 replies
- Daxim
  
  2019-10-21 19:50
  
  User since
  2007-08-01
  114 Artikel
  BenutzerIn
  
  log(2) == 0
  
  Du willst bignum, nicht bigint.
  - haj
    
    2019-10-21 20:19
    
    User since
    2015-01-07
    594 Artikel
    BenutzerIn
    
    2019-10-21T17:50:43 Daxim
    log(2) == 0
    
    Beinuhe. log2 läuft außerhalb des Scope von bigint, da ist log(2) ein float. Ich bekomme mit Perl-Versionen >= 5.20 auch NaN und nicht inf. Wenn das Unterprogramm unter bigint läuft, dann erhalte ich inf im ersten und NaN im zweiten Fall (Aufrufer ohne bigint): Dann wird ein Float 2**256 durch ein bigint vom Wert log(2)=0 dividiert, und das gibt kein inf, weil schon die Operation an sich nicht zulässig ist.
    
    In alten Perl-Versionen ist der Rückgabewert übrigens tatsächlich inf, aber ich habe zwischen 5.10 (wo das so ist) und 5.20 (wo NaN geliefert wird) gerade keine aktive Installation für eine genauere Eingrenzung. Vor 2007 war bigint nicht lexikalisch, d.h. no bigint gab es gar nicht.
- +3 replies
- haj
  
  2019-10-21 19:52
  
  User since
  2015-01-07
  594 Artikel
  BenutzerIn
  
  Dein log2 läuft außerhalb des Scope von bigint. Da macht Perl per Überladen zwar Integer-Operationen wie mit bigint, aber log(2) ist eine Gleitkommazahl. Jede Operation mit einem Bigint und einer Gleitkommazahl außerhalb des Scope von bigint liefert NaN.
  
  Ohne bigint wird 2[*]256 als Gleitkomma-Operation ausgeführt. log2 bekommt also zwei Gleitkommazahlen zur Division, und das funktioniert. Außerhalb des Bereichs von bigint ist auch der Wert von log2 2**256+1 gleich 256.
  
  Anders mit bignum, aber ich sehe grade, das hat Daxim schon geschrieben.
  - +2 replies
  - rosti
    
    2019-10-22 09:10
    
    User since
    2011-03-19
    3751 Artikel
    BenutzerIn
    
    ahh, Erleuchtung ;)
    
    Habs schon bei Daxims Hinweis verstanden und natürlich spielt hier der Scope eine Rolle.
    Ich brauche bigint demnächst für ein längeres Schieberegister und wollte mit log2 eigentlich nur prüfen ob ich mich auf bigint verlassen kann. Die Bitschieberei jedenfalls funktioniert auch mit extrem großen Zahlen einwandfrei.
    
    Vielen Dank und Güße an Alle!
    
    Und hier ist eine praktische Anwendung, besser gesagt erstma die Grundlagen dafür:
    https://rolfrost.de/zutaten.html
    
    Die Anwendung werd' ich nochbauen, da kann dann jeder Rezepte einpflegen mit ausgewählten Zutaten. Und auf diese Datenunmengen Abfragen ausführen, wie z.B.
    Quote
    Ich habe einen Sack Kartoffel, wa kann ich damit machen?
    
    Oder
    Quote
    Ich will ne Erbsensuppe kochen, was brauche ich?
    
    .
    Last edited: 2019-10-22 11:26:40 +0200 (CEST)
    https://www.rolfrost.de/
    
    Forum zu Fragen unserer Zeit
    - bianca
      
      2019-10-23 07:51
      
      User since
      2009-09-13
      7016 Artikel
      BenutzerIn
      
      Für die tatsächliche Anwendung braucht's dann aber noch Mengeneinheiten und -angaben.
      Und schön wäre auch, wenn man ein Gericht nach Tageszeit (Frühstück, Brunch, Mittag usw.) einordnen könnte. Dann könnte man nämlich auch die Frage stellen: was esse ich heute Mittag?
      10 print "Hallo"
      20 goto 10
- +5 replies
- murphy
  
  2019-10-21 19:59
  
  User since
  2004-07-19
  1776 Artikel
  HausmeisterIn
  
  bigint rechnet zwar mit (nahezu) beliebig großen Zahlen, erzwingt aber dass alle Zwischenergebnisse ganzzahlig sind!
  
  Sowohl perl -Mbigint -E'say log 2' als auch perl -Mbigint -E'say log 2**256' liefern als Ergebnis NaN.
  
  Die richtige Methode um den Logarithmus zu berechnen ist in diesem Falle wohl Math::BigInt::blog, und zwar am besten gleich mit der richtigen Basis als Argument: perl -Mbigint -E'say do { 2 ** 256 }->blog(2)' liefert die erwartete 256.
  Last edited: 2019-10-21 20:09:10 +0200 (CEST)
  When C++ is your hammer, every problem looks like your thumb.
  - +4 replies
  - haj
    
    2019-10-21 20:25
    User since
    2015-01-07
    594 Artikel
    BenutzerIn
    
    2019-10-21T17:59:17 murphy
    Sowohl perl -Mbigint -E'say log 2' als auch perl -Mbigint -E'say log 2**256' liefern als Ergebnis NaN.
    
    Mit welcher Perl-Version erhältst Du hierfür NaN?
    
    Code: (dl )
    
    1 2 3
    
    haj@hajdesktop:~$ perl -Mbigint -E'say $^V; say log 2**256' v5.30.0 177
    
    Code: (dl )
    
    1 2 3
    
    haj@hajdesktop:~$ perl -Mbigint -E'say $^V; say log 2**256' v5.10.1 177
    - +3 replies
    - murphy
      
      2019-10-23 01:39
      
      User since
      2004-07-19
      1776 Artikel
      HausmeisterIn
      
      2019-10-21T18:25:49 haj
      [...]
      Mit welcher Perl-Version erhältst Du hierfür NaN?
      [...]
      
      Code: (dl )
      
      1 2 3
      
      $ perl -Mbigint -E'say $^V; say log 2**256' v5.22.1 NaN
      
      When C++ is your hammer, every problem looks like your thumb.
      - GwenDragon
        
        2019-10-23 09:02
        
        User since
        2005-01-17
        14890 Artikel
        Admin1
        
        Hmm, ist wohl nur bei einer bestimmten Version so mit NaN.
        
        Bei mir auf StrawberryPerl 5.22.3:
        
        perl -Mbigint -E"say $^V; say log 2**256" v5.22.3 177
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - haj
        
        2019-10-23 18:28
        
        User since
        2015-01-07
        594 Artikel
        BenutzerIn
        
        Interessant, und danke für die Info. Ich habe mir via perlbrew eine Version 5.22.1 installiert und habe da auch 177 als Ergebnis bekommen.
        
        Ich habe nach einem ähnlichen Thread bei den PerlMonks auch mal diverse Backends für Math::BigInt ausprobiert (Calc, BitVect, CalcFast, GMP, Pari) - kein NaN, nirgends. Die Frage "ist es vielleicht Windows?" will ich mir nach dem Hinweis von GwenDragon (danke!) auch sparen.
        
        Mir fallen als mögliche Ursachen noch unterschiedliche Compiler bzw. Compiler-Optionen beim Bauen von Perl ein - oder unterschiedliches Verhalten drunterliegender C-Bibliotheken in verschiedenen Versionen. Aber ehrlich gesagt fehlt mir die Motivation, noch weiter reinzugraben....

View all threads created 2019-10-21 17:20.