a = permutations(filter_out(m, (1,2,3,4,5,6,7))) for e in a { for (i = 0; i < n; i++) q[i] = e[i]; q[i++] = m; for (; i < 8; i++) q[i] = e[i-1]; process(q); }

@aragaer не надо filter_out(m, тогда и в правду много раз генерить

перестановки можно генерить достаточно шустро, вроде есть какой-то там алгоритм от кнута чтле

нужно сделать так чтобы m перешло в 8

когда ты просто берешь входной список и начинаешь его деструктивно переставлять

(8-m) % 8

блин

когда ты просто берешь входной список и начинаешь его деструктивно переставлять

теперь ещё и списки переставлять....

не надо!!!!

:(

мне нужно оптимизировать цикл в примерно таком коде a = permutations (1,2,3,4,5,6,7,8) for e in a { if e[n] == m { process(e) } }

это быстее будет

доктор меня все игнорируют

я не совсе понимаю твою идею

смотри

пусть у тебя есть числа 1..7

ну я ж человек простой, я тут вообще списков не вижу, вижу массив в 8 интов 8)

ты можешь сделать преобразование в {1..8} \ {m} ?

ты можешь сделать преобразование в {1..8} \ {m} ?

ну да

для каждого m отдельно

там должна быть функция какая-то из % и арифметики, для всех подходящая

вот тогда теперь, если ты генеришь перестановки для 1..7

1 шт.

то из них ты можешь создать все перестановки для 1..8 с m на заданной позиции

по правилу n_i, i<позиция = f(e[i]), n_позиция =m, ...

где f твоя функция

в общем-то вот и все

ты генеришь перестановки и сохраняешь их

там должна быть функция какая-то из % и арифметики, для всех подходящая

?

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

что-то типа f(i) = (i + 8 - m) % 9

т.е. m-ный элемент перейдет в 8 которого в списке нету

остальные перейдут в 0..7

так у нас с единицы было

f(i) = 1 + (i+8-m) % 9

Prelude Control.Monad Data.List> let f m i = 1 + (i + 8 - m) `mod` 8 Prelude Control.Monad Data.List> map (f 5) [0..7] [4,5,6,7,8,1,2,3]

блин не, все не то, но формула есть

Prelude Control.Monad Data.List> let f m i = 1 + (i + m - 8) `mod` 8 Prelude Control.Monad Data.List> map (f 5) [0..7] [6,7,8,1,2,3,4,5]

во

т.е. при m=5 пятерке соотвествует 8-ка, которой нету в списке, 1-7 отображаются на {1..8} \\ {5}

т.е. q[i] = 1+(e[i]+m-8) % 8

для любого m

дальше 7!*цена-генерации-элемента + 7! * цену сборки 8 элементного массива vs 8!*цена-генерации-элемента по скорости

7!*(размер перестановки)+1 vs 8!*(размер перестановки) по памяти

по скорости я не учитывал прыжки по индексам во втором случае и посчитав их бесплатными

@yellow_apple норм?

дальше 7!*цена-генерации-элемента + 7! * цену сборки 8 элементного массива vs 8!*цена-генерации-элемента по скорости

но ведь 7!*цена-генерации-элемента + 7! * цену сборки 8 элементного массива ещё надо умножить на 8, нет?

зачем?

не надо

ты же понимаешь что из одной перестановки (1..7) ты можешь получить все перестановки чисел (1..8) с m на позиции n

т.е. тебе нужно сгенерить 1 перестановку

в смысле сгенерить все перестановки {1..7} 1 раз

мы же можем искать разные числа на разных позициях а это генерирует только одно число на разных позициях

нет!!!

ааа

сдвиг на что?

1+(e[i]+m-8)%8

для 1-based

ладно я ушел на время, если будут вопросы то пиши

мне нужно оптимизировать цикл в примерно таком коде a = permutations (1,2,3,4,5,6,7,8) for e in a { if e[n] == m { process(e) } }

кароче, я хочу a = permutations (1,2,3,4,5,6,7,8) for i from 0 to 7! { process(a[f(i, n, m)]) } при этом функции f прийдётся знать о порядке в котором permutations будет генерировать перестановки или можно ещё лучше?

я все ещё не вижу почему мой варинт хуже.. ну да ладно

забавно

а где что?

хороший пакет, да

ну прост искал парсер джавы (не надеясь что такой бывает) и тут хоба инлайн джава. звучит забавно/больно

ого а можно спросить зачем?

думаю норм было бы знакомить человека с хаскелем показывая инлайн джаву

ого а можно спросить зачем?

зачем александ делал это пакет?

ilia спарк надо использовать было, в java экосистему клиента интегрироваться и т.п.

я его почти не делал, что-то на раннем этапе

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

из этих inline-X я только inline-r много делал

а

к слову fpconf попросили архитектурную штуку, а не inline-X иначе бы я про это говорил на fpconf

но т.к. fby говорит, что ответит через неделю

каждую неделю, то вот

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

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

а, как scalagen?

как rust-чо-то-там?

который раст из сишки делает?