Fedora live CD and VNC

I was installing the latest Fedora 21 via Unetbootin-built USB and had an issue with monitors. They were in a vertical position and could not be easily rotated. I did not have a spare monitor to attach in a horizontal orientation.

The machine in question had a Nvidia GT 730 graphic card. By default Xorg chooses to use nouveau drivers. For some reason, they do not allow the rotation of the screen via xrandr – the output was:

$ xrandr -q
...
default connected 1920x1080+0+0 0mm x 0mm
...
$ xrandr --output default --rotate left
xrandr: output default cannot use rotation "left" reflection "none"

I tried installing proprietary nvidia drivers, using the instructions here:

However, that did not work – looks like it was running out of space on the root mount, which had this:

Filesystem           Size  Used  Avail Use% Mounted on
/dev/mapper/live-rw  2.9G  2.4G   538M  82% /

Running the given commands:

$ su -c 'yum localinstall --nogpgcheck http://download1.rpmfusion.org/free/fedora/rpmfusion-free-release-$(rpm -E %fedora).noarch.rpm http://download1.rpmfusion.org/nonfree/fedora/rpmfusion-nonfree-release-$(rpm -E %fedora).noarch.rpm'
$ yum install akmod-nvidia-304xx "kernel-devel-uname-r == $(uname -r)"
yum update -y

resulted in IO issues. Might have been just a faulty USB. :)

Anyway, I opted to use my laptop and set up a VNC connection instead. Here are the steps:

  • Install TigerVNC

Instructions here: http://docs.fedoraproject.org/en-US/Fedora/21/html/System_Administrators_Guide/ch-TigerVNC.html

root# yum install tigervnc-server
root# cp /lib/systemd/system/vncserver@.service /etc/systemd/system/vncserver@.service
  • Configure TigerVNC

Edit VNC server systemd config:

root# vi /etc/systemd/system/vncserver@.service

and change to liveuser, add geometry parameter as appropriate for your situation

  • Update SELinux policy

Due to this bug: https://bugzilla.redhat.com/show_bug.cgi?id=1062968

root# yum update selinux-policy

In my case, this updated selinux-policy to 3.13.1-105.9.fc21 and worked fine with it.

  • Set up the password
liveuser$ vncpasswd
  • Enable VNC port

Credits: http://www.howopensource.com/2011/08/vnc-error-unable-to-connect-to-host-no-route-to-host-113-solved/

root# iptables -I INPUT 1 -p tcp --dport 5901 -j ACCEPT
  • Reload the configuration and start the server
root# systemctl daemon-reload
root# systemctl start vncserver@:1.service

Credits: http://forums.fedoraforum.org/showthread.php?t=272137&page=4

Edit VNC xstartup file:

liveuser$ vi ~/.vnc/xstartup

Comment out this line:

exec /etc/X11/xinit/xinitrc

Add this line at the end:

/usr/bin/xfce4-session &

Restart VNC server:

root# systemctl restart vncserver@:1.service

Now you should have a running VNC server that you can access with some VNC client. I used vinagre as the laptop had Xubuntu, but any other should work. Fedora installation worked fine using this setup and was really quick.

The nicest thing – VNC session was horizontal :).


41 Responses to “Fedora live CD and VNC”

make money with a iphone on October 15th, 2017 02:36:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you will find 37661 more Informations|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Scr888 Register on November 7th, 2017 12:34:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you can find 65576 additional Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Corporate Event Managers in Hyderabad on November 10th, 2017 11:04:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you will find 52281 additional Infos|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


pendaftaran cpns 2018 di medan on November 20th, 2017 11:32:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|There you can find 70867 more Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


المهندس اوس الخزرجي on December 5th, 2017 11:28:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you will find 40789 more Infos|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Diyala Engineering4 on December 10th, 2017 19:14:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you can find 99227 more Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Law Diyala on December 11th, 2017 19:07:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 25866 more Informations|Informations to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


pendaftaran cpns kabupaten serang on December 25th, 2017 05:32:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you can find 15775 more Informations|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


student on December 27th, 2017 19:25:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you can find 30393 more Infos|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


lowongan cpns formasi sma on December 28th, 2017 14:36:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you will find 12624 more Informations|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


mrcheckout on February 14th, 2018 14:47:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you can find 28881 additional Infos|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


donna vinci on February 17th, 2018 07:27:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you will find 5666 additional Infos|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


먹튀검증 on February 18th, 2018 01:25:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|There you can find 11036 additional Infos|Informations to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Handtücher besticken lassen günstig on February 28th, 2018 10:46:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|There you will find 61105 more Infos|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


instalação rede informática on March 6th, 2018 05:55:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you can find 87446 additional Informations|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Cheap hotels in Madrid on April 13th, 2018 17:20:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you will find 70710 additional Informations|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


exercices fessiers efficaces on April 19th, 2018 15:20:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you will find 90929 additional Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


how do I cure premature ejaculation on April 24th, 2018 10:29:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|There you will find 88098 more Infos|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


buy jintropin on May 4th, 2018 11:14:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 52061 additional Informations|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


physio clinics auckland on May 4th, 2018 18:42:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you can find 67770 more Infos|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


DMPK CRO Services on May 15th, 2018 07:29:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you can find 92024 additional Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


payday advance on May 20th, 2018 23:20:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|There you can find 50139 additional Infos|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Elizabeth Bay Locksmith on May 30th, 2018 06:27:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 84264 additional Infos|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Online Casino Reviews on June 3rd, 2018 09:56:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you can find 91677 more Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


hoverboard on June 12th, 2018 17:31:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you will find 21245 more Infos|Informations to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Predrag Timotić on June 15th, 2018 10:25:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you will find 33847 more Informations|Informations to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


boutique en ligne on June 21st, 2018 03:46:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you can find 89022 more Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


rekrutmen pegawai 2018 on June 26th, 2018 10:19:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you can find 21806 additional Informations|Informations to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


view it on June 30th, 2018 16:48:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|There you can find 63592 additional Informations|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


blacharz łódź on July 4th, 2018 09:20:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you can find 62304 additional Informations|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


안전놀이터 on July 6th, 2018 00:30:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you will find 60933 additional Infos|Infos on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


bitcoincasino us on July 8th, 2018 16:43:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you can find 46227 additional Infos|Informations to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


top pokie sites on July 9th, 2018 00:33:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you will find 88410 additional Informations|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


click here on July 9th, 2018 04:23:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you will find 2723 additional Informations|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


btc sportsbook on July 14th, 2018 01:47:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you will find 3774 more Infos|Informations to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


view on July 23rd, 2018 06:33:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you can find 80632 more Informations|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


chistes on August 5th, 2018 13:48:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|Here you can find 10998 additional Informations|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


UK Chat on August 8th, 2018 06:49:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you can find 62826 additional Infos|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


best website design bangalore on August 11th, 2018 22:27:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you will find 60212 additional Infos|Informations on that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Onevanilla on August 19th, 2018 19:41:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you will find 30356 more Informations|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


buy methandienone on August 28th, 2018 11:48:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you will find 41859 additional Informations|Infos to that Topic: icyrock.com/blog/2015/04/fedora-live-cd-and-vnc/ […]


Leave a Reply

(required)

(required)

Next round of 4clojure.com solutions

After the seventh round, five more 4clojure.com solutions:

;;; Problem 60 - Sequence Reduction
(deftest test-problem-60
  (let [v1 (fn fred
             ([f [p1 & ps]] (fred f p1 ps))
             ([f p1 [p2 & ps]]
              (cons p1
                    (when p2
                      (lazy-seq (fred f (f p1 p2) ps))))))
        __ v1]
    (is (= (take 5 (__ + (range))) [0 1 3 6 10]))
    (is (= (__ conj [1] [2 3 4]) [[1] [1 2] [1 2 3] [1 2 3 4]]))
    (is (= (last (__ * 2 [3 4 5])) (reduce * 2 [3 4 5]) 120))))

;;; Problem 59 - Juxtaposition
(deftest test-problem-59
  (let [v1 (fn [& fns]
             (fn [& xs]
               (map #(apply % xs) fns)))
        __ v1]
    (is (= [21 6 1] ((__ + max min) 2 3 5 1 6 4)))
    (is (= ["HELLO" 5] ((__ #(.toUpperCase %) count) "hello")))
    (is (= [2 6 4] ((__ :a :c :b) {:a 2, :b 4, :c 6, :d 8 :e 10})))))

;;; Problem 58 - Function composition
(deftest test-problem-58
  (let [v1 (fn [& fns]
             (fn [& xs]
               (let [[f & rfns] (reverse fns)]
                 (reduce #(%2 %)
                         (apply f xs)
                         rfns))))
        v2 (fn [& fns]
             (reduce (fn [f g]
                       (fn [& xs]
                         (f (apply g xs))))
                     fns))
        __ v2]
    (is (= [3 2 1] ((__ rest reverse) [1 2 3 4])))
    (is (= 5 ((__ (partial + 3) second) [1 2 3 4])))
    (is (= true ((__ zero? #(mod % 8) +) 3 5 7 9)))
    (is (= "HELLO" ((__ #(.toUpperCase %) #(apply str %) take) 5 "hello world")))))

;;; Problem 57 - Simple Recursion
(deftest test-problem-57
  (let [v1 [5 4 3 2 1] 
        __ v1]
    (is (= __ ((fn foo [x] (when (> x 0) (conj (foo (dec x)) x))) 5)))))

;;; Problem 56 - Find Distinct Items
(deftest test-problem-56
  (let [v1 (fn [xs]
             (loop [[e & c] xs a [] d #{}]
               (if e
                 (recur c
                        (if (d e) a (conj a e))
                        (conj d e))
                 a)))
        __ v1]
    (is (= (__ [1 2 1 3 1 2 4]) [1 2 3 4]))
    (is (= (__ [:a :a :b :b :c :c]) [:a :b :c]))
    (is (= (__ '([2 4] [1 2] [1 3] [1 3])) '([2 4] [1 2] [1 3])))
    (is (= (__ (range 50)) (range 50)))))

(run-tests)

46 Responses to “Next round of 4clojure.com solutions”

Bolide on October 20th, 2017 17:43:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you will find 59482 additional Informations|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


DMPK on November 21st, 2017 04:53:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|Here you will find 46738 additional Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Late holiday deals on November 21st, 2017 06:38:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you can find 31395 more Infos|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


how to make money with a iphone on November 24th, 2017 16:00:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you can find 15835 additional Informations|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Coehumanl on November 29th, 2017 19:18:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you will find 29953 more Infos|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Asian Dining Room Decorating Ideas on November 30th, 2017 20:36:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you will find 54352 additional Informations|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


satta matka on December 1st, 2017 08:28:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you will find 80766 additional Informations|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


In Vitro ADME Studies on December 18th, 2017 08:16:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you will find 41411 more Informations|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


empresa informática on December 22nd, 2017 18:32:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you will find 25942 additional Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Wedding Planning Services in Hyderabad on January 4th, 2018 16:49:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you will find 17884 more Infos|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


GVK BIO Updates on January 19th, 2018 06:28:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you will find 70371 more Infos|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


appliance repair Richmond Hill on February 1st, 2018 12:35:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you can find 16597 more Informations|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Dokter gigi jakarta timur on February 1st, 2018 19:45:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you will find 18581 additional Infos|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


http://wkmusic.ru/index.php/Ppc_agency_guarantee on February 10th, 2018 05:42:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|Here you will find 87639 additional Infos|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


donna vinci on February 17th, 2018 05:28:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you will find 22431 additional Informations|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


먹튀신고 on February 22nd, 2018 19:01:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you can find 77619 additional Infos|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Tree of Innovation Search Engine Optimization on February 24th, 2018 12:28:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you can find 26931 more Infos|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Arbeitshose on February 28th, 2018 10:00:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you will find 18632 more Informations|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


pag1e111 on March 25th, 2018 13:13:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you will find 96614 more Informations|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


plus de détails on April 3rd, 2018 03:29:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you will find 60659 additional Infos|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Underage Kids Naked on April 21st, 2018 03:07:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you can find 96402 additional Infos|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Java Tutorial on April 30th, 2018 12:35:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|There you will find 36187 more Infos|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


in vitro model of the human small intestinal mucosa on May 15th, 2018 07:31:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you will find 88356 additional Informations|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


mobile dog grooming near me on May 16th, 2018 05:44:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you can find 63866 more Informations|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


iPhone ricondizionati on May 22nd, 2018 08:24:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you will find 37112 additional Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


buy oxydex on June 5th, 2018 10:28:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|There you will find 41174 additional Informations|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Effective Search Engine Optimization on June 8th, 2018 12:45:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you will find 64882 additional Informations|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Reputation Monitoring on June 9th, 2018 07:18:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you will find 88165 more Informations|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


telefoonhoesjes on June 9th, 2018 18:00:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you can find 95342 additional Infos|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


jhfn e on June 10th, 2018 19:53:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you can find 41332 more Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Handsome on June 11th, 2018 13:54:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you can find 51885 additional Informations|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Predrag Timotić on June 15th, 2018 12:46:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|There you can find 80403 additional Infos|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


boutique en ligne on June 21st, 2018 06:47:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|Here you can find 16585 more Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


anchor on July 1st, 2018 20:18:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you will find 1976 more Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


College on July 2nd, 2018 11:13:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you will find 52647 additional Informations|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


DMPK studies in Beagle dogs on July 5th, 2018 11:56:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you can find 54275 more Informations|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


bitcoin betting on July 8th, 2018 21:42:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you can find 31029 additional Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


cum compilation on July 9th, 2018 10:36:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you will find 54793 more Infos|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


visit this web-site on July 13th, 2018 18:30:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|Here you can find 76076 additional Infos|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


www.tsn.us.com on July 19th, 2018 03:07:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|Here you can find 75032 more Infos|Infos on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


straight from the source on July 23rd, 2018 11:09:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|There you can find 70870 additional Informations|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


room on August 9th, 2018 18:59:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you will find 11835 additional Infos|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Viking Swing Gate Openers on August 17th, 2018 17:17:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you can find 94369 more Infos|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


sportsbook odds on August 18th, 2018 18:44:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|Here you can find 14839 additional Informations|Informations to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


carpet cleaning companies in watford on August 19th, 2018 15:38:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you can find 70536 additional Informations|Informations on that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


vanillagift on August 19th, 2018 19:51:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you can find 21683 more Informations|Infos to that Topic: icyrock.com/blog/2015/03/next-round-of-4clojure-com-solutions-7/ […]


Leave a Reply

(required)

(required)

Next round of 4clojure.com solutions

After the sixth round, five more 4clojure.com solutions:

;;; Problem 55 - Count Occurrences
(deftest test-problem-55
  (let [v1 (fn [xs]
             (reduce (fn [a v] (assoc a v (inc (get a v 0)))) {} (vec xs)))
        __ v1]
    (is (= (__ [1 1 2 3 2 1 1]) {1 4, 2 2, 3 1}))
    (is (= (__ [:b :a :b :a :b]) {:a 2, :b 3}))
    (is (= (__ '([1 2] [1 3] [1 3])) {[1 2] 1, [1 3] 2}))))

 ;;; Problem 54 - Partition a Sequence
(deftest test-problem-54
  (let [v1 (fn [n xs]
             (loop [a [] r xs]
               (if (< (count r) n)
                 a
                 (recur (conj a (take n r)) (drop n r)))))
        __ v1]
    (is (= (__ 3 (range 9)) '((0 1 2) (3 4 5) (6 7 8))))
    (is (= (__ 2 (range 8)) '((0 1) (2 3) (4 5) (6 7))))
    (is (= (__ 3 (range 8)) '((0 1 2) (3 4 5))))))

 ;;; Problem 53 - Longest Increasing Sub-Seq
(deftest test-problem-53
  (let [subseqs #(take-while not-empty (iterate (partial rest) %))
        filter2 (fn [f xs]
                  (loop [ll (first xs) l [ll] [fr :as r] (rest xs)]
                    (if (or (nil? ll)
                            (nil? fr)
                            (not (f ll fr)))
                      l
              (recur fr (conj l fr) (rest r)))))
        do-run #(map (partial filter2 <) %)
        do-long (partial filter #(> (count %) 1))
        do-sort (partial sort-by #(-' (count %)))
        v1 #(-> % subseqs do-run do-long (conj []) do-sort first)
        __ v1]
    (is (= (__ [1 0 1 2 3 0 4 5]) [0 1 2 3]))
    (is (= (__ [5 6 1 3 2 7]) [5 6]))
    (is (= (__ [2 3 3 4 5]) [3 4 5]))
    (is (= (__ [7 6 5 4]) []))))

 ;;; Problem 52 - Intro to Destructuring
(deftest test-problem-52
  (is (= [2 4] (let [[a b c d e f g] (range)] ))))

 ;;; Problem 51 - Advanced Destructuring
(deftest test-problem-51
  (let [v1 [1 2 3 4 5]
        __ v1]
    (is (= [1 2 [3 4 5] [1 2 3 4 5]] (let [[a b & c :as d] __] [a b c d])))))

(run-tests)

47 Responses to “Next round of 4clojure.com solutions”

Next round of 4clojure.com solutions « Blog Archive « icyrock.com on March 1st, 2015 01:20:

[…] the seventh round, five more 4clojure.com […]


insulation on November 1st, 2017 13:13:

… [Trackback]

[…] Read More here|Read More|Find More Infos here|There you can find 84617 more Infos|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Engineer SEO Aws ALKHAZRAJI on November 2nd, 2017 13:45:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|There you will find 55266 additional Informations|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


best SEO Aws Alkhazraji on November 8th, 2017 17:34:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you will find 91001 more Informations|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


DMPK CRO on November 20th, 2017 08:44:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|There you will find 20055 additional Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


lose weight per week on November 20th, 2017 21:00:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you can find 31535 more Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


pendaftaran cpns 2018-2019 sscn on December 1st, 2017 00:13:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|Here you will find 80737 additional Infos|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Bdsm chat on December 6th, 2017 02:07:

… [Trackback]

[…] Read More here|Read More|Find More Infos here|There you can find 8344 additional Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


eng X on December 25th, 2017 11:23:

… [Trackback]

[…] Read More here|Read More|Find More Infos here|Here you can find 73293 additional Infos|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


GVK Bioscinces on December 30th, 2017 13:36:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you will find 3418 additional Informations|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


contract research organization gvk bio on January 3rd, 2018 12:59:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you will find 79119 more Infos|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


apoio informático on January 24th, 2018 21:39:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 631 more Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Free UK Chat on February 12th, 2018 14:40:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you will find 962 additional Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


mister checkout on February 14th, 2018 15:54:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|Here you can find 71930 more Infos|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


tree of innovation SEO on February 18th, 2018 18:11:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you can find 12115 more Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


pendaftarancpns2018.com on February 25th, 2018 03:42:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you can find 71290 more Infos|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


page1 on March 10th, 2018 14:20:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you will find 99911 more Informations|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Lamborghini Hoverboard on March 31st, 2018 17:26:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|Here you will find 70003 additional Infos|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


détails on April 3rd, 2018 09:10:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you can find 57773 additional Informations|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


forex signals on April 18th, 2018 03:48:

… [Trackback]

[…] Read More here|Read More|Find More Infos here|There you will find 19015 additional Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


ICO on May 6th, 2018 10:30:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you can find 14492 more Informations|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Malaysia betting on May 8th, 2018 17:14:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you will find 24583 additional Informations|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


ADME Assay Developement on May 15th, 2018 12:43:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|Here you can find 34853 additional Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Elizabeth Bay Locksmith on May 30th, 2018 06:52:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you can find 13079 additional Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


diskusprolaps on June 2nd, 2018 12:14:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|Here you will find 80700 additional Infos|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


deep sea concrete & hardscape llc on June 4th, 2018 23:03:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you can find 62743 more Informations|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


diyala+ sciences on June 5th, 2018 20:27:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you can find 42240 additional Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Beautiful on June 11th, 2018 12:44:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you can find 31768 additional Informations|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


att skrota bilen on June 24th, 2018 11:34:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you will find 90651 more Infos|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


showup on July 2nd, 2018 04:20:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you will find 25148 more Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


fingering orgasm on July 9th, 2018 12:54:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 20193 additional Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


خرید اپارتمان در اندیشه on July 16th, 2018 08:01:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|There you will find 50952 additional Infos|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


sell my phone on July 27th, 2018 04:11:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you can find 56406 additional Informations|Infos on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Notify Incident Management on July 28th, 2018 17:08:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you will find 68325 additional Infos|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


high pr backlinks on July 30th, 2018 17:23:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you can find 21614 additional Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


エロ動画 on August 4th, 2018 17:05:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|Here you will find 99755 more Informations|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


instakram orospulari on August 5th, 2018 20:55:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you can find 13628 more Infos|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Best online casino reviews in New Zealand on August 7th, 2018 12:19:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you will find 40658 additional Informations|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Free UK Chat on August 8th, 2018 06:51:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you can find 558 more Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


likely on August 9th, 2018 20:08:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you will find 77606 more Informations|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


akurat on August 13th, 2018 12:21:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 33518 more Informations|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Mouse PK Studies on August 13th, 2018 13:47:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you can find 84974 additional Infos|Informations on that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Omegle on August 25th, 2018 08:05:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you can find 36821 additional Informations|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Digital Marketing Services on August 27th, 2018 16:57:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you can find 6289 more Informations|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Abstract Art Gallery on August 30th, 2018 17:13:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you can find 4934 additional Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Chemicalfrog.com on September 7th, 2018 17:05:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you will find 8553 more Infos|Infos to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


homepage on September 9th, 2018 17:57:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|There you can find 37728 more Informations|Informations to that Topic: icyrock.com/blog/2015/02/next-round-of-4clojure-com-solutions-6/ […]


Leave a Reply

(required)

(required)

Basic X Window keyboard and mouse input blocking

Here’s a small Python script using python-xlib that will block the keyboard and mouse input and then display random-colored, random-sized rectangles whenever an event happens. I tested it in Xubuntu 14.10, not sure if it is possible to run on non-Linux platforms. Obviously, you’ll need to install python-xlib. I use virtualenv to do that, but there’s also a “regular” Debian package available.

from Xlib import Xatom, Xutil
from Xlib.display import Display, X
import sys
import signal 
import random

class bunch(dict):
  __getattr__ = dict.__getitem__
  __setattr__ = dict.__setitem__

def check_for_magic_keys(state, event):
  keys = state['keys']
  if event.type == X.KeyPress:
    keys[event.detail] = True
  elif event.type == X.KeyRelease:
    keys[event.detail] = False

  keycode_alt = 64
  keycode_1 = 10
  keycode_delete = 119

  magic_keys = keys.get(keycode_alt) and keys.get(keycode_1) and keys.get(keycode_delete)
  if magic_keys:
    print("Magic keys pressed, exiting")
    return True

  return False

def random_color(screen):
  red = random.randrange(0, 65536)
  green = random.randrange(0, 65536)
  blue = random.randrange(0, 65536)

  return screen.default_colormap.alloc_color(red, green, blue).pixel

def random_rectangle(screen, window):
  x = random.randrange(0, screen.width_in_pixels)
  y = random.randrange(0, screen.height_in_pixels)
  width = random.randrange(0, screen.width_in_pixels - x)
  height = random.randrange(0, screen.height_in_pixels - y)

  window.window.fill_rectangle(
    gc = window.gc,
    x = x,
    y = y,
    width  = width,
    height = height,
  )

def draw(state, event):
  screen = state.display.screen()
  foreground = random_color(screen)
  background = random_color(screen)

  state.window.gc.change(
    foreground = foreground,
    background = background,
  )

  random_rectangle(screen, state.window)

def handle_event(state, event):
  debug = False
  if debug:
    print(event)
    return True

  if check_for_magic_keys(state, event):
    return False

  draw(state, event)
  return True

def grab_keyboard_and_mouse(root):
  root.grab_keyboard(
    owner_events = True,
    pointer_mode = X.GrabModeAsync,
    keyboard_mode = X.GrabModeAsync,
    time = X.CurrentTime
  )
  
  root.grab_pointer(
    owner_events = True,
    event_mask = X.ButtonPressMask | X.ButtonReleaseMask | X.PointerMotionMask,
    pointer_mode = X.GrabModeAsync,
    keyboard_mode = X.GrabModeAsync,
    confine_to = 0,
    cursor = 0,
    time = X.CurrentTime
  )

def create_window(display, root):
  screen = display.screen()

  window = root.create_window(
    x = 0,
    y = 0,
    width = screen.width_in_pixels,
    height = screen.height_in_pixels,
    border_width = 0,
    depth = screen.root_depth)
  
  atom_net_wm_state = display.intern_atom('_NET_WM_STATE', True)
  atom_net_wm_state_fullscreen = display.intern_atom('_NET_WM_STATE_FULLSCREEN', True)

  window.change_property(
    property = atom_net_wm_state,
    type = Xatom.ATOM,
    format = 32,
    data = [atom_net_wm_state_fullscreen], 
  )

  window.set_wm_normal_hints(
    flags = Xutil.PPosition | Xutil.PSize | Xutil.PMinSize,
    min_width = screen.width_in_pixels,
    min_height = screen.height_in_pixels,
  )

  gc = window.create_gc(
    foreground = screen.black_pixel,
    background = screen.white_pixel,
  )

  return bunch(window = window, gc = gc)

def event_loop(state):
  display = state.display

  while True:
    event = display.next_event()
    display.allow_events(
      mode = X.AsyncBoth,
      time = X.CurrentTime)            

    if not handle_event(state, event):
      break

def main():
  display = Display()
  root = display.screen().root

  grab_keyboard_and_mouse(root)
  window = create_window(display, root)
  window.window.map()

  state = bunch(
    display = display,
    root = root,
    window = window,
    keys = bunch())

  # Comment these out after you have confirmed the magic key works
  signal.signal(signal.SIGALRM, lambda a, b: sys.exit(1))
  signal.alarm(4)

  event_loop(state)

if __name__ == '__main__':
  main()

How it works:

  • It creates a window that covers the whole desktop
  • It then grabs both the key and the mouse input
  • Whenever an event happens, it will first check for a magic key
  • If it is a magic key, it will exit
  • If it is not a magic key, it will display a random rectangle and continue to run

The magic key is currently set to Alt + 1 + Del, pressed at the same time. There’s also a small debug section in the event loop that can be enabled by setting debug = True. Printing events like this allows for reconfiguration if needed, e.g. to change the magic key.

The above version has the signal.alarm call – I left this there, so that it exits after 4 seconds while testing. Otherwise, if it doesn’t work, you have no input. Well, actually you do – I found that Alt + F1 works, so you can escape to a console and kill the python process, but while testing I found it easier to just do a timed exit. In order to be used for longer periods, the signal lines should be commented out.


46 Responses to “Basic X Window keyboard and mouse input blocking”

photography 101 on October 24th, 2017 09:11:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you will find 45506 more Infos|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


look what i found on November 6th, 2017 19:51:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|Here you can find 75819 additional Informations|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Hyderabad Corporate Event Managers on November 7th, 2017 13:17:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you can find 59674 more Informations|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


ADME Studies on November 8th, 2017 02:33:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 46909 more Infos|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Wedding Planning Companies in Hyderabad on November 19th, 2017 07:47:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|Here you can find 14701 more Informations|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


how to make money with a iphone on November 24th, 2017 15:05:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you can find 11098 more Informations|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


visit the site on November 27th, 2017 08:31:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|Here you will find 61022 more Infos|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Bdsm chat on December 6th, 2017 02:49:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 5069 more Informations|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


university of diyala Aws Alkhazraji on December 20th, 2017 12:45:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|Here you will find 88028 more Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


iq iq Aws Alkhazraji on December 26th, 2017 00:23:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you will find 81374 more Informations|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


empresas de informática lisboa on January 11th, 2018 14:15:

… [Trackback]

[…] Read More here|Read More|Find More Infos here|Here you can find 11014 additional Infos|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


bing ads on February 3rd, 2018 11:40:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you will find 21438 additional Infos|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


UK Chat on February 12th, 2018 13:50:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you will find 66406 additional Informations|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Digital Marketing Company on February 18th, 2018 17:28:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you can find 31014 additional Informations|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Asbestos Removal in Bunbury on February 22nd, 2018 03:33:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you will find 99420 more Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


tes cons 2018 on February 25th, 2018 07:31:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 92540 additional Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


3$# on February 26th, 2018 23:05:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you can find 78584 more Informations|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


루비게임 엘리트게임 루비게임주소 on March 15th, 2018 06:24:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|There you will find 13646 additional Informations|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


mujer deporte on March 23rd, 2018 18:26:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|Here you can find 9486 additional Informations|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


free forex signals on April 18th, 2018 04:11:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you will find 94136 additional Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Naked Children on April 21st, 2018 04:46:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|Here you can find 33698 additional Infos|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


learn on May 12th, 2018 04:16:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|There you will find 90750 additional Infos|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


MDR1 substrate assesment in Caco-2 on May 15th, 2018 08:02:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you can find 56324 more Informations|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


biopharmaceutical assessment in rodents on May 15th, 2018 09:12:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you will find 73823 additional Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


best black barbershops in birmingham al on May 15th, 2018 21:14:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you will find 53104 additional Informations|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Caco-2 Contract Research Organization on May 17th, 2018 14:08:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you can find 73445 additional Informations|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Elizabeth Bay Locksmith on May 30th, 2018 06:44:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you will find 31175 more Informations|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


blokeringer on June 2nd, 2018 09:36:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|There you can find 68019 more Infos|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


h col on June 10th, 2018 21:34:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|Here you can find 86334 more Informations|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Aleksandar on June 11th, 2018 00:25:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you can find 19374 more Infos|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


pendaftaran cpns tahun 2018 kapan dibuka on June 26th, 2018 04:08:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 24138 additional Informations|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


online casino bitcoin on July 8th, 2018 15:39:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you will find 49306 additional Informations|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


windscreen specialist on July 10th, 2018 13:12:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you will find 10075 more Infos|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


archiwnetrze.pl on July 12th, 2018 06:49:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you can find 62594 more Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


토토사이트 on July 27th, 2018 09:38:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you can find 9368 more Informations|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


silne krwawienia on August 6th, 2018 14:51:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you will find 23954 additional Infos|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


levothyroxine bodybuilding on August 16th, 2018 14:07:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you will find 52031 more Informations|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


onevanilla on August 19th, 2018 19:31:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you can find 92259 additional Informations|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


star stable best club on August 28th, 2018 20:49:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you will find 47577 additional Informations|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


iphone 8 plus repair singapore on September 6th, 2018 09:46:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|Here you will find 79252 additional Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


lequipe tennis on September 14th, 2018 19:04:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you will find 6671 more Infos|Infos to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


home gym mirrors on September 18th, 2018 11:22:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|There you can find 97203 additional Infos|Informations on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


outsource your marketing on September 18th, 2018 14:01:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 63081 additional Infos|Infos on that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Free Teen Chat on September 19th, 2018 10:44:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you will find 18843 more Informations|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


PK programs on September 21st, 2018 03:44:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you can find 38700 additional Infos|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


免求人 on September 27th, 2018 11:25:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you will find 35759 more Informations|Informations to that Topic: icyrock.com/blog/2015/01/basic-x-window-keyboard-and-mouse-input-blocking/ […]


Leave a Reply

(required)

(required)

Duolingo lessons to go

If you are using Duolingo and are nearing the end of the tree, you might be anxious to know how many lessons are left till you can claim your tree is all golden. Here’s a small Javascript snippet that allows to get that from the main language page on the site:

var lessons = $('.lessons-left:not(:empty)').map(function() {
    return this.innerHTML
})

var listToInt = function(list) {
    return _.map(list, function(e) {
        return parseInt(e)
    })
}

var expanded = _.map(lessons, function(e) {
    var list = e.split('/')
    return listToInt(list)
})

var done = _.collect(expanded, _.head)
var total = _.collect(expanded, _.last)

var sum = function(list) {
    return _.reduce(list, function(a, b) { 
        return a + b
    }, 0)
}

console.log("lessons to go:", sum(total) - sum(done))

Here’s how it can be used:

  • Open Chrome Developer Tools window by pressing F12
  • Go to Sources tab
  • Go to Snippets sub-tab
  • On the left, right-click and select New to create a new snippet. Name it whatever you like, I named it “Duolingo – lessons to go”
  • Put the above code in the snippet source tab that opens
  • Run it by pressing Ctrl + Enter or by clicking on a play icon in the top right of the Developer Tools window

It should print your tree leftover in the console. Now let’s get that number down to 0!


46 Responses to “Duolingo lessons to go”

must watch on November 24th, 2017 16:48:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you will find 82266 more Infos|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Aws Alkhazraji on December 5th, 2017 12:46:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you will find 297 more Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


dent training on December 21st, 2017 07:06:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you will find 84549 additional Infos|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


manutencao informatica on December 22nd, 2017 14:22:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you will find 9931 more Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Pharmacokinetic studies contract research organization on January 22nd, 2018 23:49:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you can find 83656 more Informations|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


adwords testing on February 1st, 2018 11:59:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|Here you can find 77039 additional Infos|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


church suits on February 17th, 2018 03:40:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|Here you can find 33758 more Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


green coffee on February 24th, 2018 05:49:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you can find 35294 more Informations|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


oscars on March 2nd, 2018 14:32:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you can find 72561 more Informations|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


움짤 on March 26th, 2018 03:09:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|There you can find 92440 additional Informations|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Online Reputation Management on March 30th, 2018 16:57:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|There you can find 8445 more Infos|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


www.squeeqee.co.uk/carpet-cleaning-enfield on April 8th, 2018 15:17:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|Here you can find 19500 additional Informations|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


h col on April 19th, 2018 06:52:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|There you will find 78148 additional Informations|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Recipes on April 30th, 2018 16:12:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you can find 32783 more Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


ankle physiotherapy exercises on May 4th, 2018 19:02:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|Here you will find 30044 more Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


free forex signals on May 7th, 2018 22:19:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you will find 85324 more Informations|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


tutorialcup on May 12th, 2018 04:49:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|There you will find 34648 more Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


In Vitro ADME services from CRO on May 15th, 2018 08:45:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you will find 50471 additional Informations|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


blokeringer on June 2nd, 2018 10:14:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you will find 63750 additional Infos|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


sciences on June 5th, 2018 19:14:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|There you can find 70745 more Infos|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Pcelar on June 11th, 2018 10:14:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 63372 more Informations|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Wisdom Teeth Surgery on June 11th, 2018 12:07:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you will find 13901 additional Infos|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Predrag Timotić on June 15th, 2018 13:52:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|There you will find 207 additional Informations|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


boutique en ligne on June 21st, 2018 03:12:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|Here you will find 21061 more Infos|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


her explanation on June 30th, 2018 18:12:

… [Trackback]

[…] Read More here|Read More|Find More Infos here|There you will find 25988 more Infos|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


agen idnplay on July 4th, 2018 01:34:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you will find 48596 more Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


토토사이트 추천 on July 6th, 2018 04:48:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you will find 73503 additional Informations|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


bitcoin games on July 8th, 2018 18:45:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you will find 20993 more Informations|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


online pokies New Zealand on July 9th, 2018 05:24:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you will find 18952 more Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


he has a good point on July 23rd, 2018 06:06:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you can find 68557 additional Informations|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


online pokies real money on July 23rd, 2018 08:17:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you will find 76664 more Informations|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


fuck islam on August 3rd, 2018 12:51:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|Here you will find 45065 additional Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Free UK Chat on August 8th, 2018 07:46:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you can find 107 additional Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


asian handicap on August 18th, 2018 15:45:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|There you will find 27776 additional Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Visit Your URL on August 20th, 2018 19:01:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you will find 33681 more Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


child sex on August 23rd, 2018 05:43:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you will find 66257 more Infos|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Digital Marketing in Canada on August 27th, 2018 11:54:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you can find 33307 more Informations|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


bitmex API on August 31st, 2018 23:43:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you will find 97426 more Infos|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Minnesota on September 3rd, 2018 18:39:

… [Trackback]

[…] Read More here|Read More|Find More Infos here|There you will find 8216 more Infos|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Caco-2 on September 4th, 2018 09:02:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 34613 more Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


btc on September 7th, 2018 15:35:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|Here you will find 12005 more Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Pharmacokinetic Screening services ousourcing on September 10th, 2018 16:03:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you can find 87001 additional Infos|Informations on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Japanese Knotweed Fix on September 15th, 2018 17:10:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|Here you can find 27906 more Informations|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


wakad call girls on September 19th, 2018 07:50:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you can find 37258 additional Infos|Informations to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Teen Chat on September 19th, 2018 09:21:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|Here you can find 63592 additional Informations|Infos on that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


In Vivo PK screening on September 21st, 2018 04:28:

… [Trackback]

[…] Read More here|Read More|Read More Informations here|There you can find 37894 more Informations|Infos to that Topic: icyrock.com/blog/2014/12/duolingo-lessons-to-go/ […]


Leave a Reply

(required)

(required)

Project Euler in Haskell – problems 6 through 10

Continuing from the previous one, here are my solutions to problems 6-10. Same warning applies – they are unusually long for a Haskell program and as usual take them with a grain of salt.

Project Euler 6 in Haskell

Project Euler problem 6

ssdiff :: Int -> Int
ssdiff n = (sum [1..n] ^ 2) - (sum $ map (^2) [1..n])
  
main = do
  print $ ssdiff 10
  print $ ssdiff 100

Project Euler 7 in Haskell

Project Euler problem 7

import           Data.Numbers.Primes

nthprime :: Int -> Int
nthprime n = primes !! (n-1)

main = do
  print $ nthprime 6
  print $ nthprime 10001

Project Euler 8 in Haskell

Project Euler problem 8

import           Data.Char
import           Data.List

minLen :: Int -> [a] -> Bool
minLen n xs = not $ null (drop n xs)

nibbles :: Int -> [a] -> [[a]]
nibbles n xs = map (take n) $ filter (minLen n) $ tails xs

prod :: String -> Int
prod s = product $ map digitToInt s

maxProd :: String -> Int -> Int
maxProd s n = maximum $ map prod (nibbles n s)

main :: IO ()
main = do
     txt <- readFile "src/Euler/euler8.txt"
     numTxt <- return $ concat $ lines txt
     print $ maxProd numTxt 4
     print $ maxProd numTxt 13

Project Euler 9 in Haskell

Project Euler problem 9

pythTrip :: Int -> Int
pythTrip n = head [a * b * c | a <- [1..n - 2]
                             , b <- [a + 1..n - 2]
                             , let c = n - a - b
                             , c > b
                             , a ^ 2 + b ^ 2 == c ^ 2]

main :: IO ()
main = do
     print $ pythTrip 1000

Project Euler 10 in Haskell

Project Euler problem 10

This one was interesting. Using the Data.Numbers.Primes package, it’s very easy and very fast:

import qualified Data.Numbers.Primes as P

sumOfPrimes :: Int -> Integer
sumOfPrimes n = (sum . map toInteger . takeWhile (< n)) P.primes

main :: IO ()
main = do
     print $ sumOfPrimes 10
     print $ sumOfPrimes 2000000

However, I was intrigued how to do Sieve of Eratosthenes in Haskell. Here’s what I came up with:

import qualified Data.Vector.Unboxed as UV

sieve :: Int -> UV.Vector Bool
sieve m = let s = UV.replicate (1 + m) True
              sqm = (floor . sqrt . fromIntegral) m
              update v n
                | v UV.! n == False = v
                | otherwise  = UV.update v (UV.zip xs ys)
                  where sqn = n * n
                        xs = UV.enumFromStepN sqn n (1 + (m - sqn) `div` n)
                        ys = UV.replicate (UV.length xs) False
              sievep v n
                | n <= sqm = sievep (update v n) (n + 1)
                | otherwise = v
          in sievep s 2

primes :: Int -> [Int]
primes m = (UV.toList . UV.drop 2 . UV.map fst
            . UV.filter ((== True) . snd)
            . UV.zip (UV.enumFromN 0 (1 + m)) . sieve) m

sumOfPrimes :: Int -> Integer
sumOfPrimes = sum . map toInteger . primes

main :: IO ()
main = do
     print $ sumOfPrimes 10
     print $ sumOfPrimes 2000000

I must say I was a bit surprised how the process of writing turned out to be different. First, I used Vectors and Arrays package provided much confusion here. Not sure if I’m right, but looks like Vectors package is newer. Some things such as DiffArray turned out to be unsuccessful experiments, for example. Second, I found it quite un-Haskelly, given the solution is non-lazy and bounded.

I guess the number of different solutions and papers (some relatively new to that point) that I found, especially on the main Haskell Wiki page says a lot:

I guess I’ll just go with the built-in for now.


Leave a Reply

(required)

(required)

Solving the Impossible puzzle in Clojure

I found this puzzle recently. I should say I rediscovered it, as I knew it from before. I wanted to solve it in Clojure – here’s one possible solution, with comments on the thought process involved in solving it (in the comments before the actual code).

(ns com.icyrock.clojure.prb.xynum)

; http://puzzling.stackexchange.com/questions/251/i-dont-know-the-two-numbers-but-now-i-do
; http://en.wikipedia.org/wiki/Impossible_Puzzle
; http://people.sc.fsu.edu/~jburkardt/fun/puzzles/impossible_solution.html

; Two numbers, 1 < x < y, x + y < n (n = 100 in the linked question)
; p = x * y
; s = x + y

; p: I cannot determine the two numbers.
;   => p not unique: p = x1 * y1 = x2 * y2 = ...
;      Let's call this an ambiguous product

; s: I knew that.
;   => s can be created from one or multiple pairs: s = x1 + y1 = x2 + y2 = ...
;      Those pairs form these products:
;        p1 = x1 * y1
;        p2 = x2 * y2
;        ...
;      Each of these products can be created from multiple pairs (i.e. is ambiguous):
;        p1 = x11 * y11 = x12 * y12 = ...
;        p2 = x21 * y21 = x12 * y22 = ...
;        ...
;      Let's call this product-ambiguous sum

; p: Now I can determine them.
;   => p = x1 * y1 = x2 * y2 = ...
;      Only one of (xk, yk) forms a product-ambiguous sum
;      Let's call this unambiguous product

; s: So can I.
;   => s = x1 + y1 = x2 + y2 = ...
;      Only one of all the possible products:
;        p1 = x1 * y1
;        p2 = x2 * y2
;        ...
;      is an unambiguous product
;      Let's call this unambiguous sum

(defn xynum [n]
  (let [pairs (for [y (range 2 n) x (range 2 y) :when (< (+ x y) n)] [x y])
        sum-map (group-by (partial apply +) pairs)
        prod-map (group-by (partial apply *) pairs)
        ; Pair forms a product. That product can be formed from at least some other pair.
        is-ambiguous-product (fn [pair] 
                               (> (count (prod-map (apply * pair))) 1))
        ; Pair forms a sum. That sum can be formed from other pairs. Those pairs form some products. All those products are ambiguous.
        is-product-ambiguous-sum (fn [pair] 
                                   (every? true? (map is-ambiguous-product (sum-map (apply + pair)))))
        ; Pair forms a product. That product can be formed from other pairs. Only one of those pairs forms a product-ambiguous sum.
        is-unambiguous-product (fn [pair] 
                                 (= 1 (count (filter true? (map is-product-ambiguous-sum (prod-map (apply * pair)))))))
        ; Pair forms a sum. That sum can be formed from other pairs. Only one of those pairs forms an unambiguous product.
        is-unambiguous-sum (fn [pair] 
                             (= 1 (count (filter true? (map is-unambiguous-product (sum-map (apply + pair)))))))
        is-pair-a-candidate (fn [pair] (and
                                         (is-ambiguous-product pair)
                                         (is-product-ambiguous-sum pair)
                                         (is-unambiguous-product pair)
                                         (is-unambiguous-sum pair)))
        candidates (filter is-pair-a-candidate pairs)]
    (println "Pair count:" (count pairs))
    (println "Sum map count:" (count sum-map))
    (println "Product map count:" (count prod-map))
    (println "Candidates count:" (count candidates))
    (println "Candidates: " candidates)))

(defn -main []
  (xynum 100))

(-main)

Note also the Wikipedia entry, which contains solutions in other languages. I particularly liked the Scala version, notably for its conciseness and readability.


Leave a Reply

(required)

(required)

Next round of 4clojure.com solutions

After the fifth round, five more 4clojure.com solutions:

;;; Problem 50 - Split by Type
(deftest test-problem-50
  (let [v1 (fn [xs] (for [t (map type xs)] (filter #(= (type %) t) xs))) 
        v2 (fn [xs] (vals (group-by type xs)))
        __ v2]
    (is (= (set (__ [1 :a 2 :b 3 :c])) #{[1 2 3] [:a :b :c]}))
    (is (= (set (__ [:a "foo"  "bar" :b])) #{[:a :b] ["foo" "bar"]}))
    (is (= (set (__ [[1 2] :a [3 4] 5 6 :b])) #{[[1 2] [3 4]] [:a :b] [5 6]}))))
 
;;; Problem 49 - Split a sequence
(deftest test-problem-49
  (let [v1 (fn [n xs] [(take n xs) (drop n xs)]) 
        __ v1]
    (is (= (__ 3 [1 2 3 4 5 6]) [[1 2 3] [4 5 6]]))
    (is (= (__ 1 [:a :b :c :d]) [[:a] [:b :c :d]]))
    (is (= (__ 2 [[1 2] [3 4] [5 6]]) [[[1 2] [3 4]] [[5 6]]]))))
 
;;; Problem 48 - Intro to some
(deftest test-problem-48
  (let [v1 6 
        __ v1]
    (is (= __ (some #{2 7 6} [5 6 7 8])))
    (is (= __ (some #(when (even? %) %) [5 6 7 8])))))

;;; Problem 47 - Contain Yourself
(deftest test-problem-47
  (let [v1 4 
        __ v1]
    (is (contains? #{4 5 6} __))
    (is (contains? [1 1 1 1 1] __))
    (is (contains? {4 :a 2 :b} __))
    ; No longer works in CLojure 1.5+: http://clojuredocs.org/clojure_core/clojure.core/contains_q
    ; (is (not (contains? '(1 2 4) __))) 
    ))

;;; Problem 46 - Flipping out
(deftest test-problem-46
  (let [v1 (fn [f] #(f %2 %)) 
        __ v1]
    (is (= 3 ((__ nth) 2 [1 2 3 4 5])))
    (is (= true ((__ >) 7 8)))
    (is (= 4 ((__ quot) 2 8)))
    (is (= [1 2 3] ((__ take) [1 2 3 4 5] 3)))))

(run-tests)

One Response to “Next round of 4clojure.com solutions”

Next round of 4clojure.com solutions « Blog Archive « icyrock.com on February 26th, 2015 20:58:

[…] the sixth round, five more 4clojure.com […]


Leave a Reply

(required)

(required)

Next round of 4clojure.com solutions

After the fourth round, five more 4clojure.com solutions:

;;; Problem 45 - Intro to Iterate
(deftest test-problem-45
  (let [v1 [1 4 7 10 13] 
        __ v1]
    (is (= __ (take 5 (iterate #(+ 3 %) 1))))))
 
;;; Problem 44 - Rotate Sequence
(deftest test-problem-44
  (let [v1 (fn [n xs] (let [k (mod n (count xs))] (concat (drop k xs) (take k xs))))
        __ v1]
    (is (= (__ 2 [1 2 3 4 5]) '(3 4 5 1 2)))
    (is (= (__ -2 [1 2 3 4 5]) '(4 5 1 2 3)))
    (is (= (__ 6 [1 2 3 4 5]) '(2 3 4 5 1)))
    (is (= (__ 1 '(:a :b :c)) '(:b :c :a)))
    (is (= (__ -4 '(:a :b :c)) '(:c :a :b)))))
 
;;; Problem 43 - Reverse Interleave
(deftest test-problem-43
  (let [v1 (fn [xs n] (partition (/ (count xs) n) (apply interleave (partition n xs)))) 
        __ v1]
    (is (= (__ [1 2 3 4 5 6] 2) '((1 3 5) (2 4 6))))
    (is (= (__ (range 9) 3) '((0 3 6) (1 4 7) (2 5 8))))
    (is (= (__ (range 10) 5) '((0 5) (1 6) (2 7) (3 8) (4 9))))))
 
;;; Problem 42 - Factorial Fun 
(deftest test-problem-42
  (let [v1 #(apply * (range 1 (inc %)))
        __ v1]
    (is (= (__ 1) 1))
    (is (= (__ 3) 6))
    (is (= (__ 5) 120))
    (is (= (__ 8) 40320))))
 
;;; Problem 41 - Drop Every Nth Item
(deftest test-problem-41
  (let [v1 (fn [xs n] (apply concat (map #(take (dec n) %) (partition-all n xs))))
        __ v1] 
    (is (= (__ [1 2 3 4 5 6 7 8] 3) [1 2 4 5 7 8]))
    (is (= (__ [:a :b :c :d :e :f] 2) [:a :c :e]))
    (is (= (__ [1 2 3 4 5 6] 4) [1 2 3 5 6]))))
 
(run-tests)

One Response to “Next round of 4clojure.com solutions”

Next round of 4clojure.com solutions « Blog Archive « icyrock.com on September 14th, 2014 07:18:

[…] the fifth round, five more 4clojure.com […]


Leave a Reply

(required)

(required)

Lazy seq for Pascal’s triangle in Clojure

Here’s a lazy-seq for Pascal’s triangle:

(ns com.icyrock.clojure.prb.lazy_seq
  (:use clojure.test))

(defn next-pascal-row [prev]
  (concat [1] (map #(apply + %) (map list prev (rest prev))) [1]))

(deftest next-pascal-row-test
  (is (= [1 1] (next-pascal-row [1])))
  (is (= [1 2 1] (next-pascal-row [1 1])))
  (is (= [1 3 3 1] (next-pascal-row [1 2 1])))
  (is (= [1 4 6 4 1] (next-pascal-row [1 3 3 1]))))

(defn lazy-pascal-triangle 
  ([] (lazy-pascal-triangle [1]))
  ([prev] (cons prev 
                (lazy-seq (lazy-pascal-triangle (next-pascal-row prev))))))

(deftest lazy-pascal-triangle-test
  (is (= [[1]
          [1 1]
          [1 2 1]
          [1 3 3 1]
          [1 4 6 4 1]
          [1 5 10 10 5 1]
          [1 6 15 20 15 6 1]]
         (take 7 (lazy-pascal-triangle)))))

(run-tests)

46 Responses to “Lazy seq for Pascal’s triangle in Clojure”

Fernando on July 30th, 2014 08:33:

Nice. You could also leverage iterate:

(defn lazy-pascal-triangle ([] (lazy-pascal-triangle [1])) ([prev] (iterate next-pascal-row prev)))


icyrock.com on August 18th, 2014 21:40:

Great, thanks for the addition Fernando!


ADME Assays on December 18th, 2017 05:24:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you can find 21867 more Informations|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Corporate Event Management Companies on January 4th, 2018 20:41:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|Here you can find 16860 more Informations|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


apoio informático on January 24th, 2018 19:30:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you will find 3650 additional Informations|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


check this site on February 12th, 2018 14:29:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|There you will find 4042 more Infos|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


먹튀신고 on February 19th, 2018 18:35:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you will find 35097 additional Infos|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


home page on February 26th, 2018 20:19:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|Here you will find 10480 more Infos|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


网站1 on May 7th, 2018 11:08:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|Here you can find 78509 additional Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


forex signals on May 7th, 2018 19:26:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you can find 30008 more Infos|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


love meters on June 2nd, 2018 21:59:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|Here you can find 34056 more Informations|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Simonovic on June 11th, 2018 02:27:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|Here you can find 34052 additional Infos|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


sbobet168 th on June 11th, 2018 07:17:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you will find 67787 more Informations|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


university of diyala on June 13th, 2018 22:01:

… [Trackback]

[…] Read More on|Read More|Find More Infos here|There you can find 33445 additional Infos|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


gitano on June 14th, 2018 10:43:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you will find 17102 more Informations|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Predrag Timotić on June 15th, 2018 14:04:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|There you can find 77980 additional Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


update cpns 2018 on June 26th, 2018 10:39:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|Here you will find 22369 more Infos|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


colege11 on July 2nd, 2018 07:28:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 84975 more Infos|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


cheap online viagra on July 5th, 2018 05:46:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you can find 4599 additional Infos|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


top 10 kiwi casinos on July 10th, 2018 11:45:

… [Trackback]

[…] Read More here|Read More|Find More Informations here|There you can find 37272 more Informations|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


serena hentai on July 11th, 2018 04:33:

… [Trackback]

[…] Find More here|Find More|Read More Informations here|There you can find 951 additional Informations|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


archiwnetrze.pl on July 12th, 2018 04:50:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you will find 17601 additional Informations|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


usa bitcoin sportsbook on July 14th, 2018 03:47:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you will find 64086 additional Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


www.tsn.us.com on July 19th, 2018 07:14:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you can find 98791 additional Infos|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


best place to buy xiaomi on July 27th, 2018 03:05:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|Here you will find 25550 more Informations|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


토토사이트 추천 on July 27th, 2018 07:23:

… [Trackback]

[…] Find More here|Find More|Find More Infos here|Here you can find 57164 more Infos|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


fitness gear on August 3rd, 2018 08:55:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you will find 92941 additional Informations|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


instakram amcik kasmak on August 5th, 2018 23:15:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you can find 64283 more Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Caco-2 vitro studies on August 14th, 2018 03:16:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|Here you will find 50265 more Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


horse game on August 29th, 2018 00:28:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|There you will find 13521 more Informations|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


PAMPA on September 4th, 2018 06:50:

… [Trackback]

[…] Find More on|Find More|Find More Infos here|There you can find 50648 more Infos|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


best Pharmacokinetic Screening services on September 4th, 2018 18:41:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|There you will find 94643 additional Infos|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


shemale.uk on September 8th, 2018 18:59:

… [Trackback]

[…] Read More on|Read More|Read More Infos here|Here you will find 60594 more Infos|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


home gym ideas on September 18th, 2018 16:16:

… [Trackback]

[…] Find More here|Find More|Read More Infos here|There you can find 26238 more Infos|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Teen Chat Rooms on September 19th, 2018 10:02:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|Here you can find 83873 more Infos|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


學生借錢ptt on September 27th, 2018 10:34:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|There you will find 98545 additional Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Youtube promotion on October 1st, 2018 18:39:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|There you can find 24216 additional Informations|Informations to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


click here on October 2nd, 2018 17:06:

… [Trackback]

[…] Find More on|Find More|Find More Informations here|Here you can find 73082 more Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


iCloud on October 2nd, 2018 18:07:

… [Trackback]

[…] Read More on|Read More|Find More Informations here|Here you can find 30744 additional Informations|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


superiorcarpet.us on October 3rd, 2018 01:30:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you will find 71999 additional Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


check on October 3rd, 2018 05:11:

… [Trackback]

[…] Find More on|Find More|Read More Infos here|There you will find 94956 more Infos|Infos on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


bitcoin hosting on October 3rd, 2018 18:28:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|Here you will find 91402 more Infos|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Houston Uterine Fibroid Doctor on October 7th, 2018 17:39:

… [Trackback]

[…] Read More here|Read More|Read More Infos here|There you can find 13375 additional Infos|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


http://www.wein-grandinger.de on October 7th, 2018 17:55:

… [Trackback]

[…] Find More on|Find More|Read More Informations here|Here you will find 45782 more Informations|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


chat no download on October 12th, 2018 23:07:

… [Trackback]

[…] Find More here|Find More|Find More Informations here|There you can find 90910 additional Informations|Informations on that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Porn movie on October 13th, 2018 02:50:

… [Trackback]

[…] Read More on|Read More|Read More Informations here|Here you will find 8138 additional Informations|Infos to that Topic: icyrock.com/blog/2014/07/lazy-seq-for-pascals-triangle-in-clojure/ […]


Leave a Reply

(required)

(required)