longcashman 发表于 2013-4-4 16:41:55

太强大了，只能仰视了

springwillow 发表于 2013-5-23 10:14:19

水平确实高啊！

革天明 发表于 2015-4-9 11:41:57

(setq f (trans_format f))
(eval (list 'defun 'func (list 'x) f))

这两句能解释一下吗？
假设f=(+ 3 x)
(setq f (trans_format f))返回的是（+ nil 3）
(list 'defun 'func (list 'x) f)应该是定义了一个函数名为func参数为x的函数
(eval (list 'defun 'func (list 'x) f))是对函数求值，但是没有参数输入呀
如果（func 5）就会提示出错

highflybird 发表于 2019-7-8 23:58:49


关于我的积分程序，已经做了重大更新，截图如上。但现在暂不提供源码。
此截图中，你会说为何有的值不一样，那你得首先了解一下积分和这类型的积分是什么含义。在此恕不解答。
龙贝格积分普遍有效，高斯勒让德也是，而且高斯勒让德法更高效。但对于某些特殊积分，就需要用到下面的方法，譬如广义积分，椭圆积分等。

JHX948954875 发表于 2019-7-9 09:43:51

谢谢楼主分享，

guankuiwu 发表于 2021-2-14 15:33:50

厉害厉害

tigcat 发表于 2022-4-4 22:23:34

支持高飞大神,说实在的,那些积分干什么用的真不知道,也不知道何时会用到.

lijunfa12345 发表于 2024-10-1 14:52:37

很强大。。。。
页: 1 [2]
查看完整版本: 【飞鸟集】用LISP求积分