wenjian 发表于 2023-10-24 19:21:18

【源码】解数独游戏的小程序

本帖最后由 wenjian 于 2023-10-26 10:44 编辑

数独小程序，用的穷举，算法较笨，解难题要花时间！
解过号称世界最难数独，花了6个多小时;P！

;2023-10-26
;注释掉了print,修改了jianyan函数速度明显提升
;用(function (lambda替换原'(lambda，速度也有所提升
优化后的代码解世界最难数独花了1分多钟！当然了，速度和电脑配置有关



crtrccrt 发表于 2023-10-25 13:48:32

本帖最后由 crtrccrt 于 2023-10-25 13:49 编辑

      (setq new (append new '((62 . 1))))
      (entmod new)
下增加一行
      (entupd (cdr (assoc -1 new)))

另外,print用princ代替

wenjian 发表于 2023-10-25 15:07:37

crtrccrt 发表于 2023-10-25 13:48
(setq new (append new '((62 . 1))))
      (entmod new)
下增加一行


感谢大佬指点

wenjian 发表于 2023-10-26 10:48:04

crtrccrt 发表于 2023-10-26 09:25
'(lambda
用
(function (lambda代替


感谢！程序已更新！速度提升了不少

菜鸟初来乍到 发表于 2023-10-25 08:15:16

好厉害啊，点赞

行天下 发表于 2023-10-25 09:30:22


好厉害啊，点赞

magicheno 发表于 2023-10-25 15:56:33

感谢大佬分享

mahuan1279 发表于 2023-10-25 17:07:38

优化下会更快。

wenjian 发表于 2023-10-25 17:32:44

mahuan1279 发表于 2023-10-25 17:07
优化下会更快。

大佬给个算法

tigcat 发表于 2023-10-25 20:43:58

太强了，感谢分享

crtrccrt 发表于 2023-10-26 09:25:16

'(lambda
用
(function (lambda代替
经测试,可以提高速度
页: [1] 2
查看完整版本: 【源码】解数独游戏的小程序