Применить функцию к каждому элементу списка - это просто:
map _ []     = []
map f (x:xs) = f x : map f xscreate different ssh key according the article Mac Set-Up Git
$ ssh-keygen -t rsa -C "[email protected]"
| <?php | |
| /* From https://www.usps.com/send/official-abbreviations.htm */ | |
| $us_state_abbrevs_names = array( | |
| 'AL'=>'ALABAMA', | |
| 'AK'=>'ALASKA', | |
| 'AS'=>'AMERICAN SAMOA', | |
| 'AZ'=>'ARIZONA', | |
| 'AR'=>'ARKANSAS', | 
L1 cache reference ......................... 0.5 ns
Branch mispredict ............................ 5 ns
L2 cache reference ........................... 7 ns
Mutex lock/unlock ........................... 25 ns
Main memory reference ...................... 100 ns             
Compress 1K bytes with Zippy ............. 3,000 ns  =   3 µs
Send 2K bytes over 1 Gbps network ....... 20,000 ns  =  20 µs
SSD random read ........................ 150,000 ns  = 150 µs
Read 1 MB sequentially from memory ..... 250,000 ns = 250 µs
Locate the section for your github remote in the .git/config file. It looks like this:
[remote "origin"]
	fetch = +refs/heads/*:refs/remotes/origin/*
	url = [email protected]:joyent/node.git
Now add the line fetch = +refs/pull/*/head:refs/remotes/origin/pr/* to this section. Obviously, change the github url to match your project's URL. It ends up looking like this:
| $stack, $draws = [], {} | |
| def method_missing *args | |
| return if args[0][/^to_/] | |
| $stack << args.map { |a| a or $stack.pop } | |
| $draws[$stack.pop(2)[0][0]] = args[1] if args[0] == :< | |
| end | |
| class Array | |
| def +@ | 
| # Automatically generates the plain-text version of emails from the html | |
| # template using premailer. | |
| class SmartMailer < ActionMailer::Base | |
| def mail(headers={}) | |
| # Configure the premailer options | |
| premailer_options = { | |
| with_html_string: true, | |
| line_length: 9999, | |
| } | 
| #!/usr/bin/env escript | |
| -mode(compile). | |
| -compile(export_all). | |
| main([]) -> io:format("Usage: ~s URL [Count=1000]~n", [escript:script_name()]); | |
| main([URL]) -> main([URL,"100"]); | |
| main([URL,C] ) -> manage_workers(URL, [start_worker(URL, N) || N <- lists:seq(1,list_to_integer(C))]), ok. | 
| 13:15 <xQuasar> | HASKELL IS FOR FUCKIN FAGGOTS. YOU'RE ALL A BUNCH OF | |
| | FUCKIN PUSSIES | |
| 13:15 <xQuasar> | JAVASCRIPT FOR LIFE FAGS | |
| 13:16 <luite> | hello | |
| 13:16 <ChongLi> | somebody has a mental illness! | |
| 13:16 <merijn> | Wow...I suddenly see the error of my ways and feel | |
| | compelled to write Node.js! | |
| 13:16 <genisage> | hi | |
| 13:16 <luite> | you might be pleased to learn that you can compile | |
| | haskell to javascript now | 
| % sublime: syntax Erlang | |
| config <- config_line* ~; | |
| % Here goes all possible top-level things | |
| config_line <- listener / loglevel / sessions / max_sessions_option / autogenerate_tokens / include / | |
| http_event / central / stream / rewrite / live / file / | |
| view_auth / edit_auth; |