Г
Size: a a a
2020 August 21
KW
yeah but telegram and markdown
PD
Последнее время писал на Feliz-е, и сейчас надо было вернуться к элмишу, и что-то сижу уже долго и совершенно не вдупляю что тут не так
PD
А, замечательно. Проблемы не было, перезагрузка проекта убрала эту фантомную ошибку
2020 August 22
RM
Що? Wha?
VK
Що? Wha?
Это цепи маркова
T
Мужики, привет. Помогите, плиз
T
как-то можно зациклить функции setRed и setGreen
AH
let setRed next tr =
setGreen {tr with State ... }
and setGreen next tr =
setRed {tr with State ... }
setGreen {tr with State ... }
and setGreen next tr =
setRed {tr with State ... }
T
но хотелось бы, чтобы они друг о друге не знали
AH
TES
но хотелось бы, чтобы они друг о друге не знали
ну допустим
AH
let rec cycleRedGreen = function
| Red -> cycleRedGreen setGreen
| Green -> cycleRedGreen setRed
очевидно она вечная и никогда не закончится, но ты сам этого хотел
| Red -> cycleRedGreen setGreen
| Green -> cycleRedGreen setRed
очевидно она вечная и никогда не закончится, но ты сам этого хотел
AH
хотя можно пофиксить
T
let rec cycleRedGreen = function
| Red -> cycleRedGreen setGreen
| Green -> cycleRedGreen setRed
очевидно она вечная и никогда не закончится, но ты сам этого хотел
| Red -> cycleRedGreen setGreen
| Green -> cycleRedGreen setRed
очевидно она вечная и никогда не закончится, но ты сам этого хотел
да, именно это. мне нужен был вечный цикл
T
спасибо
AH
let cycleRedGreen = function
| Red -> Green
| Green -> Red
| Red -> Green
| Green -> Red
AH
АХАХАХА
T
)
T
а как в матче внутри function обратится к полю записи?
T
у меня ж TrafficLight возвращается