If it says 17mm, it's fixed at that...you can't zoom in or out. Advantages: cheaper.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
def generate_valid_isbn | |
prefix = 978.to_s # must be 978 or 979 | |
registration_group_element = rand(10).to_s | |
registrant_element = (rand(90000) + 10000).to_s | |
publication_element = (rand(900) + 100).to_s | |
_isbn = prefix + registration_group_element + registrant_element + publication_element | |
check_digit = 0 | |
i = 0 | |
_isbn.each_char do |letter| | |
i+= 1 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
trap("SIGINT") do | |
puts "goodbye!" | |
# exit | |
end | |
while true | |
end |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import Control.Applicative | |
import Github.Gists | |
import Github.Users.Followers | |
import System.Directory | |
import Control.Monad | |
import qualified Data.Set as S | |
import Text.Printf | |
import System.Process | |
import System.IO.Unsafe |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import Control.Concurrent | |
import System.Process | |
import System.Environment | |
say str = system $ "say '" ++ str ++ "'" | |
timer :: Int -> IO () | |
timer 1 = do | |
say "one minute left! oh crap!" | |
threadDelay $ 30 * 1000 * 1000 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env ruby | |
_import = $stdin.gets | |
import = _import.chomp.gsub("import", "").gsub("qualified", "").gsub(/as .*/, "") | |
cmd = "hoogle -i '#{import}'" | |
puts cmd | |
packages = `#{cmd}` | |
lines = packages.split("\n") | |
package = lines.find do |line| |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
require 'rubygems' | |
require 'celluloid' | |
class Philosopher | |
include Celluloid | |
def initialize(name, left_fork, right_fork) | |
@name = name | |
@left_fork = left_fork | |
@right_fork = right_fork | |
self.think |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
require 'rubygems' | |
require 'celluloid' | |
class Philosopher | |
include Celluloid | |
def initialize(name, left_fork, right_fork) | |
@name = name | |
@left_fork = left_fork | |
@right_fork = right_fork | |
self.think |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
require 'benchmark' | |
module Wrapper | |
def self.extended(klass) | |
klass.class_eval do | |
@@methods = {} | |
def self.methods | |
@@methods | |
end | |
def self.set_method k, v |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{-# LANGUAGE MultiWayIf #-} | |
import Data.List | |
import Control.Monad | |
import Control.Monad.Trans.Writer | |
kcombinations n arr = snd . runWriter $ combos [] 1 n arr | |
combos :: (Eq a) => [a] -> Int -> Int -> [a] -> Writer [[a]] () | |
combos acc step n array = forM_ (zip array [1..]) $ \(val, i) -> if | |
| val `elem` acc -> return () |