marchdown

(defvar github-token nil
  "If non-nil, will be used as your GitHub token without checking
git-config(1).")

marchdown

$ exec/lein
Downloading Leiningen now...
  % Total    % Received % Xferd  Average Speed   Time    Time     Time  Current
                                 Dload  Upload   Total   Spent    Left  Speed
  0     0    0     0    0     0      0      0 --:--:--  0:00:02 --:--:--     0
curl: (22) The requested URL returned error: 404
Failed to download https://github.com/downloads/technomancy/leiningen/leiningen-2.0.0-SNAPSHOT-standalone.jar
If you have Maven installed, you can do
mvn dependency:copy-dependencies; mv target/dependency lib
See README.md for further SNAPSHOT build instructions.

marchdown

################################################################################
# Programs must be written for people to read, and only incidentally for machines to execute. 
#         -- Abelson & Sussman, SICP 
#         http://mitpress.mit.edu/sicp/full-text/book/book-Z-H-7.html
#
# Особенно это важно для кода, который хочется обсудить, понять и поправить — т.е. практически для любого. 
# Так что я буду оставлять комментарии по мере чтения, так читать проще.
# Комментарии будут _под_ соответствующими строками кода.
def function(s):
    st='#'

marchdown

 logging
from functools import partial

if __name__ == '__main__':
  print '''
Программа работает из интерактивной сесии (REPL'а):
>>> from lab34 import *

есть два разборщика, lab3 и lab4. 
пользоваться так:

marchdown

#!/usr/bin/python
# -*- coding: utf-8 -*-
import sys#, re, logging
from functools import partial

if __name__ == '__main__':
  print '''
Программа работает из интерактивной сесии (REPL'а):
>>> from lab34 import *

marchdown

################################################################################
# Programs must be written for people to read, and only incidentally for machines to execute. 
#         -- Abelson & Sussman, SICP 
#         http://mitpress.mit.edu/sicp/full-text/book/book-Z-H-7.html
#
# Особенно это важно для кода, который хочется обсудить, понять и поправить — т.е. практически для любого. 
# Так что я буду оставлять комментарии по мере чтения, так читать проще.
# Комментарии будут _под_ соответствующими строками кода.
def function(s):
    st='#'

marchdown

//http://algowiki.net

import javax.vecmath.Point3d;

public class Dijkstra {

	final int MAX;
	final int EDGES;
	final double INFINITE = 998.0;

marchdown

//http://algowiki.net

import javax.vecmath.Point3d;

public class Dijkstra {

	final int MAX;
	final int EDGES;
	final double INFINITE = 998.0;

marchdown

Порождение парадигм германских сильных глаголов

Обстановка:

Есть много (порядка сорока, считая значимые диалекты и мертвые языки) германских языков. В них во всех есть похожим образом устроенная глагольная система. Глаголы делятся на два больших надкласса: сильные и слабые. Сильные глаголы образуют формы прошедшего времени и причастия, меняя гласную в корне. Выбор конкретной гласной определяется "абляутным рядом": набором из четырех гласных (или дифтонгов, или нулей), разных абляутных радов много, и конкретный их набор разнится от языка к языку.

Для построения всех форм глагола нужно знать:

1. язык (и набор абляутных рядов этого языка)
2. заглавную форму глагола

marchdown

import Prelude hiding (takeWhile)
sum :: Num a => [a] -> a
sum = foldr (+) 0
product :: Num a => [a] -> a
product = foldr (*) 1
and :: [Bool] -> Bool
and = foldr (&&) True

-- NB pointful function definitions compile just fine without type annotations
and' xs = foldr (&&) True xs