1. Куча / Говнокод #21266

    −19

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    (* Solving the Queen Puzzle *)
#define N 8
#define NSOL 10
val () =
(((fix qsolve(n: int): stream(list0(int)) => if(n > 0)then((qsolve(n-1)*list0_make_intrange(0,N)).map(TYPE{list0(int)})(lam($tup(xs,x))=>cons0(x,xs))).filter()(lam(xs)=>let val-cons0(x0,xs) = xs in xs.iforall()(lam(i, x)=>((x0)!=x)&&(abs(x0-x)!=i+1)) end)else(stream_make_sing(nil0())))(N)).takeLte(NSOL)).iforeach()(lam(i, xs)=>(println!("Solution#", i+1, ":"); xs.rforeach()(lam(x) => ((N).foreach()(lam(i)=>(print_string(ifval(i=x," Q", " ."))));println!()));println!()))

    Запостил: LispGovno, 25 Сентября 2016

    Комментарии (30) RSS

    • ava LispGovno 25.09.2016 13:49 # −1

      #ats

      AtsGovno, скоро на всем говнокоде страны
      Ответить

    • ava bormand 25.09.2016 13:52 # +1

      > #define
      Макросы с выводом типов?
      Ответить

    • ava 1024-- 25.09.2016 18:28 # +4

      > .filter()(lam(xs)=>let val-cons0(x0,xs) = xs in xs.iforall()(lam(i, x)=>((x0)!=x)&&(abs(x0-x)!=i+1)) end)else
      Фу, какая жуткая каша из пробелов, значков и скобочек. Будто собрались питон, экмаскрипт и лисп, напились и устроили дебош.
      Ответить

      • ava CrashTesterAnusov 25.09.2016 19:06 # −65

        показать все, что скрытоУ тебя есть силы разговаривать? Соси хуй.
        Ответить

      • ava bormand 25.09.2016 20:26 # 0

        > let val-cons0(x0,xs) = xs in
        "Обозначим val-cons0(x0,xs) как xs"?
        Ответить

        • ava CrashTesterAnusov 25.09.2016 20:28 # −67

          показать все, что скрытоОбозначил тебе в очко.
          Ответить

          • ava bormand 25.09.2016 20:31 # +1

            Ты написал бота, который ищет в сообщении глагол и склоняет его в нужную форму?
            Ответить

            • ava huesto 25.09.2016 20:50 # +1

              Хорошая идея, но он всё вручную. Да и не проще захардкодить все часто встречающиеся глаголы?
              Ответить

        • ava LispGovno 25.09.2016 23:11 # −1

          Ну этот язык может в док-ва. Видимо можно объявлять функции от обратного. Хотя не, тут скорее подстановка

          Я не понял, а кто Queen Puzzle решит то? Говнокод уже не тот. Го в пролог или меркури

          Вот хаски довольно легко читается. А тут я не могу не гугля квин пазл понять что решает прога
          Ответить

        • ava LispGovno 25.09.2016 23:20 # −1

          CONS0 - constant signal
          Description
          CONS0 is a submodel which outputs a signal with a constant specified value.
          короче это просто банальное объявление функции, которая возвращает свой второй параметр и игнорит первый
          Ответить

    • ava CrashTesterAnusov 25.09.2016 23:35 # −65

      показать все, что скрытоНикогда не понимал, нахуй надо придумывать или решать бесполезные задачи по программированию, если единственное, что требуется от программиста - тупо программировать формы, кнопки, работу с базой данных и т.д.?
      Ответить

      • ava BagorCtretora 25.09.2016 23:37 # −67

        показать все, что скрытоТы очень метко описал работу пхпшника
        Ответить

      • ava huesto 25.09.2016 23:39 # −1

        Чем задроченей программист, тем меньше вероятность, что он объебется при обращении к базе. Пример пхпешников показывает, что объебаться можно даже в самой простой работе.
        Ответить

        • ava CrashTesterAnusov 25.09.2016 23:45 # −65

          показать все, что скрытоСтрого говоря, именно адепты "PHP" создали девяносто девять процентов Интернет-сайтов. Ваш любимый "ВКонтакте" с отфотошопленными котиками и псевдофилософскими цитатками, "Facebook", две известные нам биржи фриланса, доски объявлений "Avito" и "OLX", данный сайт, тонны других... И что создали ходоки по IT-конференциям и доблестные победители олимпиад по программированию?
          Ответить

          • ava huesto 25.09.2016 23:49 # −2

            Это не важно, в этом бараке пхпшники - питухи.

            > доблестные победители олимпиад по программированию
            Бэкенд вконтакте они и сделали. Не пхпшникам же эту работу доверять.
            Ответить

            • ava CrashTesterAnusov 25.09.2016 23:52 # −66

              показать все, что скрытоСравнительно недавно, четыре-пять лет назад. До этого спокойно выдерживали десятки миллионов быдел одновременно.
              Ответить

            • ava LispGovno 26.09.2016 00:02 # −1

              > Бэкенд вконтакте они и сделали.
              сделали. Там в соцсетях сейчас тренд: пхп ту нейтив компилятор используется. Раньше это был голый пхп. Баграунд типа бд, компиляей и осей к пхп делали коненчо не лалки пехапешники, но свою работу они сделали как видишь на славу и все пока работает
              Ответить

              • ava huesto 26.09.2016 00:10 # −1

                Сколько не читаю твои коменты, все не покидает ощущение, что ты школьник.
                Ответить

                • ava LispGovno 26.09.2016 00:13 # −1

                  Как-будто что-то плохое... Но ты почти прав. Я школота.
                  Ответить

          • ava BagorCtretora 25.09.2016 23:53 # −67

            показать все, что скрытоОни сделали иос, андроид, линукс, виндуос, вебшторм, студию, икскод, постгрес, да вме практически
            Ответить

    • ava guest8 07.09.2019 11:44 # −999

      показать все, что скрытоvanished
      Ответить

    Добавить комментарий