kpmy

За столом разговор пошел дружнее, стали уж вроде и забывать про Глеба Капустина... И тут он попер на кандидата. -- В какой области выявляете себя? -- спросил он. -- Где работаю, что ли? -- не понял кандидат. -- Да. -- На филфаке. -- Философия? -- Не совсем... Ну, можно и так сказать. -- Необходимая вещь. -- Глебу нужно было, чтоб была -- философия. Он оживился. -- Ну, и как насчет первичности?

kpmy

package main

import (
	"bufio"
	"encoding/json"
	"fmt"
	"os"
	"reflect"
)

kpmy

    UNIT Top
    	REG r,  x INTEGER
    	VAR max INTEGER
    PROCESS
    	10 -> max
    	x >= 0 ? r + x : r -> r
    	x >= 0 ? x < max ? x + 1 : -1 :  -1 -> x

END Top

kpmy

	PROCEDURE Fact
		VAR x-, res+ INTEGER
		INFIX res x
	BEGIN
		IF x > 0 THEN res := x * \Fact x - 1
		ELSE res := 1 END
	END Fact

kpmy

MODULE Test5

VAR
	i, j INTEGER
	ok BOOLEAN

BEGIN
	i := 4
	j := (i + 9) % 2
	ok := i < 4

kpmy

MODULE Test2
VAR
	i, j INTEGER
	k INTEGER
BEGIN
	i := 0
	j := i
	k := j + 1
END Test2.

kpmy

package main

import (
	"fmt"
)

type bitchStruct struct {
	shit int
}

kpmy

Каждому приходилось сталкиваться с непоколебимой убеждённостью стариков в самых нелепых умозрениях, которые невозможно опровергнуть никакими аргументами. Парадоксально, но с аналогичными формами поведения часто приходится сталкиваться у молодых людей с хорошей сохранностью нервной системы.  Казалось бы, собственный опыт должен их научить тому, что личная убеждённость - не истина, и наоборот, но этого не происходит. Дело тут в старой проблеме, описанной в начале книги - энергетическом парадоксе мозга. Мозгу человека легче и удобнее пользоваться своим или чужим убеждением, религиозным законом или правилом, чем растрачивать драгоценную энергию на рассудочный анализ любого события и поступка. Эта позиция энергетически выгодна и почти безопасна, так как окружающие обычно поступают аналогичным образом. Массовая праздность мозга расцветает пышным цветом, а самокритичность и рассудочное мышление становятся неприятной случайностью даже у интеллектуальных извращенцев.

kpmy

 -364 [000000000000000000000------] WWW -364
 -363 [000000000000000000000-----0] WWX -363
 -362 [000000000000000000000-----+] WWY -362
 -361 [000000000000000000000----0-] WWZ -361
 -360 [000000000000000000000----00] WW0 -360
 -359 [000000000000000000000----0+] WW1 -359
 -358 [000000000000000000000----+-] WW2 -358
 -357 [000000000000000000000----+0] WW3 -357
 -356 [000000000000000000000----++] WW4 -356
 -355 [000000000000000000000---0--] WXW -355

kpmy

type Foo interface {
	Bar(...int) int
}

type foo struct {
	x int
}

func (f *foo) Bar(x ...int) int {
	if len(x) == 1 {