In Flames - Metaphor

You stole my pure intentions
You are the sickness in between let me in
I'll bury the pain you taught me to be sad as you
You almost made me taker it all let me in
I'll bury the pain the sickness that you are a plague
That made me starve
Do you think you can show me how I got this far?
You bend me and you shake me you beg then you break me let me in
I'll bury the pain you made me feel like a sinner
Now you fear you'll die alone let me in
I'll bury the pain I feel
It's taking over and everything falls dark
Break me open, the desperate cry

Генератор функций являющихся автономными автоматами

Переоткрыл очередной велосипед.
Меня всегда раздражало то, что для задания автомата приходилось что-то примерно такого вида(mutable можно и на ref заменить, не суть важно):

 type Aut(state: 'S) =
  let mutable st = state
  
  member this.Next(x: 'A): 'B =
    ...
    st <- ...
    result

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

  let rec create (f: 'S -> 'I -> 'O) (g: 'S -> 'I -> 'S) (state: 'S) =
    let st = ref state
 
    fun (x: 'I) ->
      let r = f !st x
      st := g !st x
      r

т.е. передаём функции создателю 3 параметра: функцию выходов, функцию переходов и начальное состояние. Если передать 2 параметра, то, за счёт карирования получим не инициальный автомат, а если 3(или нач. стостояние в карированную ф-цию) - инициальный автомат.

Ну и пример работы:

let adder = 
  create 
    (fun s x -> 
      match s with
        | 0 -> x+1
        | 1 -> x
        | _ -> s+x
      ) 
    (fun s x -> (s+1) % 10) 0

 printfn "%A" [
    for i in 0..20 ->
      adder 1
  ]

результат:

[2; 1; 3; 4; 5; 6; 7; 8; 9; 10; 2; 1; 3; 4; 5; 6; 7; 8; 9; 10; 2]

Забавно

Забавно чувствовать и понимать, что стал сильнее, умнее, выносливее... Понимать, что понимаешь больше... Чувствовать переполняющие тебя идеи, устремления, желания...

И это то после всех этих лет... Я уже и не надеялся снова вернуться к жизни, да ещё и настолько вырасти... Это неожиданно. Но Это приятно. Надеюсь я не упущу Это.

Со временем проверю.

Лишь серый коридор...

Наша жизнь лишь серый коридор по которому мы бредём от развилки к развилке. А на развилке нас ожидает очередная порция синеньких, зелёненьких ну или же голубеньких таблеточек.
Скушай, торкнись и бреди дальше, до следующей порции, не замечая унылости и серости своей жизни.

Тошнит от этого. Хочется сожрать пакет этих таблеток и улететь в нирвану. Навсегда. Чтобы не видеть этого уныния. Ну и пусть. Всё равно никому я тут не нужен.

Никому не нужен... простые слова. Очень простые. Но чувствовать себя одиноким, жалким и никому не нужным далеко не просто. А при этом ещё и надевать железную маску на людях тем более.

Чёрт, а к маске таки пришлось вернуться. Давно я её не носил. Года 3.5-4 уже как. Мда...

Чертовски устал...

Чертовски устал, а впереди ещё так много всего того, что нужно\хочется сделать:)

Планы, мечты и обязанности - это то, что заставляет нас жить, то, ради чего мы живём, работаем, умираем и убиваем. Это и есть суть жизни - спринт между смертью и нашими устремлениями, а судья тут неумолимое время.

Вот только мы бежим по десятку дорожек одновременно, причём не всегда эти дорожки направленны в одну сторону (частенько это совершенно разные стороны), а вот смерть всегда стремиться к одной точке - к нам.

Забавно, в голову пришло такое сравнение:

Жизнь человека - это хаотичные метания атома, которые натянули на колесо времени, а смерть приближается к колесу откуда то со стороны. И то, чем мы занимаемся определяет то, как близко  мы находимся к смерти в итоге в некоторый момент времени.

Не знаю уж к чему были эти размышления - наверно мне просто захотелось пофилософствовать немного, но, как обычно, никого нет, чтобы занять меня разговором в реальном мире. Ну да и чёрт с ним:)


Хотя поиски интересных людей - это интересная тема. Вообще, я так понимаю, для каждого из людей круг общения определяется образованием, IQ, интересами, менталитетом и наверно ещё тысячей и одной мелочью, но это не важно. Важно то, что найти интересного тебе человека, да ещё чтобы и ему было с тобой интересно - для меня это невероятно трудно.

Я знаю нескольких людей, которые очень близки к такому идеалу, но всё же каждый из них обладает некоторыми недостатками в этом, скажем так, "образе". Кто-то хорошо понимает мои мысли и чувства, и с ним приятно общаться на темы музыки, кино и т.п., но он далёк от моих увлечений в математике и программировании. С кем-то интересно общаться по поводу программирования, но об остальном тяжеловато. Ну а на темы функционального программирования я вообще не могу ни с кем толком пообщаться, из своих друзей и знакомых естественно, не рискуя наткнуться на вопрос: "Нафига? C++\C#\Java\C\PHP\Python - это круто, ФП - ацтой непонятный".

Ну а свои безумные идеи я тем более держу в себе по большей части. Никто ж не поймёт меня наверно.

Странно вообще. Я вот понимаю что-то допустим, но далеко не всё. Кто-то понимает что-то другое. Хотя оба мы знаем одно и то же. Почему? Почему два человека, обладая одинаковыми знаниями, в итоге могут получить различные результаты? Случайность? Закономерность?

Ответ на этот вопрос крайне интересен на самом деле, ибо, на мой взгляд, именно в нём кроется разгадка человеческого разума.

И, возможно, ну, по крайней мере я на это очень надеюсь, я знаю где и как стоит искать ответы на этот вопрос.

Главное найти в себе силы и стремление получить их. Надеюсь у меня получиться пройти этот путь.

Грустно всё это...

Вот сейчас я несколько неожиданно для себя простудился. Оч. неприятно это, но не смертельно, просто неприятно.

Но вот что я осознал сейчас: Никто обо мне не вспоминает, никто мне не звонит, не спрашивает что с тобой, где ты, почему не в сети?...

Как будто и нет меня, нет такого человека. Грустно... Ведь никто не приедет проведать, не положит руку мне на голову, чтобы температуру мою проверить, не заварит чая с лимоном...

Ни-че-го. Ти-ши-на.

Так же я опять дорассуждаюсь то того, что людям вокруг меня нужна лишь моя фальшивая улыбка и слова: "Всё хорошо, а у тебя как?".

Не знаю. Хочется верить, что это не так, но жизнь вокруг меня упрямо пытается показать, что всё, к моему глубокому сожалению, именно так. Грустно.

Что ж, завтра я снова буду улыбаться, ругаться и разговаривать, потому что вы этого хотите от меня ибо больше мне жить незачем.

А ведь мне просто хочется... нет, даже не любви, о ней я уже и мечтать не могу... нееет... мне хочется найти такого человека с которым я мог бы говорить о Всём. Именно так, именно с большой буквы. И чтобы он мог меня выслушать и подбодрить. Всегда, ну или почти всегда.

Всё круто. Всё зашибись

Комп сломался  - отдан в ремонт.
А нужно доделать грамматики, графику и криптографию.
Вообщем всё в шоколаде =)