www.jammni.de

Logo - Kleiner Drache
Login
Username:

Passwort:

Daten merken
Auto-Login
Registrieren
 
Online
niemand
 
Forumsuche
Suche nach:

Logo - DracheHaskell-Forum

vorherige Seite 1 2 3  

Jacke

Gepostet:
31.01.2007 23:06

   
hier mal eine funktionierende variante ohne modulo

Type :? for help
Main> encode "a" 3
"\291"
Main> decode (encode "a" 3) 3
"a"
Main> decode (encode "test" 3) 3
"test"
Main>


encode "" _ = []
encode (w:ws) n = (chr(n*ord w)::Char) : encode ws n

decode "" _ = []
decode (w:ws) n = (chr((ord w) `div` n)) : decode ws n

gruß Jacke

ps: deine mult_inverse funktion gibt übrigens eine list zurrück...
Zum Seitenanfang    
 
Blacksoul

Gepostet:
31.01.2007 23:24

   
stimmt...hab das head([x|x <- [1..256], (x * n) `mod` 257 == 1]) < ? vergessen..
----> obwohl ich immer nur eine zahl zurückbekommen habe..

bei deiner version gibt es doch dann aber auch verschlüsselungen über das ascii-system hinaus am ende oder?
Zum Seitenanfang    
 
Siracusa

Gepostet:
01.02.2007 02:35

   
Ja Wahnsinn, Jacke!!!

Keine Ahnung warum das funktioniert, aber es funktioniert.
decode (encode ls 123) 123 == ls where ls = ['\0'..'\255']  ==> True

Smilie
Komplizierter ist also nicht immer besser. ^^
Zum Seitenanfang    
 
Jacke

Gepostet:
01.02.2007 07:51

   
ja die lösung ohne modulo geht weiter als der ascii satz...:-(
Zum Seitenanfang    
 
Blacksoul

Gepostet:
01.02.2007 14:19

   
So..ich wollte nochmal allen danken.. :)

hab 14 Punkte bekommen -> 1 :)

dankööö^^

mfg
Zum Seitenanfang    
 
Siracusa

Gepostet:
01.02.2007 18:34

   
Achso, jetzt hab ich's auch geschnallt, der rechnet mit Unicode-Zeichen.
Zum Seitenanfang    
 
Blacksoul

Gepostet:
01.02.2007 20:21

   
"Achso, jetzt hab ich's auch geschnallt, der rechnet mit Unicode-Zeichen."

Hä? :D
Zum Seitenanfang    
 
Siracusa

Gepostet:
01.02.2007 20:37

   
Unicode geht von '\0' bis '\65.000' nochwas, ASCII nur von '\0' bis '\255'. Ich dachte der rechnet n*ord w und macht dann automatisch mod 256, um nicht aus dem ASCII-Zeichensatz rauszukommen. Aber der geht ja beim neuen WinHugs bis 65.000 Zeichen, also hat er noch genug Luft nach hinten zum Rechnen.
Zum Seitenanfang    
 
Blacksoul

Gepostet:
01.02.2007 21:54

   
Mir fehlt gerade eine Zitierfunktion xD

"zum (un)glück" nutzen wir in der schule ja noch den alten hugs insofern^^..

nja...hat sich glaube erledigt der thread :)..danke nochma
Zum Seitenanfang    
 
Jacke

Gepostet:
01.02.2007 22:00

   
Smilie ja das mit den zitieren nervt mich auch immer ^^...

gern geschehen
Zum Seitenanfang    
 

vorherige Seite 1 2 3