Έχουν δημοσιευτεί Τετάρτη, 23 Απριλίου 2008 6:37 μμ από το μέλος PALLADIN

Yannis's Law

Τον νομο του Moore φαντάζομαι ότι τον ξέρετε...Τον Νομο του Γιάννη όμως????
Λοιπόν, ο Γιάννης Σμαραγδάκης ισχυρίζεται ότι η παραγωγικότητα των προγραμματιστών διπλασιάζεται κάθε 6 χρονια!!!
Όπως λέει και ο ίδιος...(I'm only half serious, but half is enough)
Δοκίμασα στην πράξη τον ισχυρισμό του, και το αποτέλεσμα είναι ότι με την αγαπημένη μου F# ολοκληρώσαμε το  προτεινόμενο σύστημα μέσα σε 10 λεπτά!

let circularly_shift list =
   let rec inner_circularly_shift list counter =
      match counter with
         | 0 -> []
         | _ -> match list with
                  | [] -> []
                  | x :: xs -> 
                     let head_shift = xs @ [x]
                     head_shift :: inner_circularly_shift head_shift (counter - 1)
   inner_circularly_shift list list.Length

let space_join = List.fold1_left (fun first second -> first + " " + second)
let space_split = String.split [' ']

let system list = list  |> List.map (fun item -> space_split item)
                        |> List.map (fun item -> circularly_shift item) 
                        |> List.flatten
                        |> List.map (fun item -> space_join item)
                        |> List.sort (fun first second -> first.CompareTo(second))
                        |> Set.of_seq

let result = system ["1 2 3"; "3 2 1"]

(Sorry αλλα δεν υποστηρίζεται color highlighting για F# Sad)

Κλείνοντας, να αναφέρω ότι xθες ενημερώθηκα πως ο Γιάννης Σμαραγδάκης εκλέχτηκε αναπληρωτής καθηγητής στο ΕΚΠΑ, με γνωστικό αντικείμενο Τεχνολογία Λογισμικού...πολλά συγχαρητήρια και απο εμενα

Share


Ενημέρωση για Σχόλια

Αν θα θέλατε να λαμβάνετε ένα e-mail όταν γίνονται ανανεώσεις στο περιεχόμενο αυτής της δημοσίευσης, παρακαλούμε γίνετε συνδρομητής εδώ

Παραμείνετε ενήμεροι στα τελευταία σχόλια με την χρήση του αγαπημένου σας RSS Aggregator και συνδρομή στη Τροφοδοσία RSS με σχόλια

Σχόλια:

Χωρίς Σχόλια

Ποιά είναι η άποψή σας για την παραπάνω δημοσίευση;

(απαιτούμενο)
απαιτούμενο
προαιρετικό
απαιτούμενο
ÅéóÜãåôå ôïí êùäéêü:
CAPTCHA Image