Jacobi符号计算的一种实现
来源:互联网 发布:苹果cms采集插件 编辑:程序博客网 时间:2024/06/07 15:55
Jacobi符号是Legendre符号的推广,在素性检验以及因子分解等诸多方面极为有用,所以先写一个备着,写其他算法时方便直接调用。
(defun jacobi (n m)
(let ((e 0)
(a1 0)(a n)
(s 0)(b m)
(n1 0))
(cond ((= a 0) 0)
((= a 1) 1)
(t
(if (/= 0 (mod a 2)) (progn (setf a1 a) (setf e 0))
(loop while (= 0 (mod a 2)) do
(setf a (/ a 2)) (setf a1 a) (incf e)))
(cond ((= 0 (mod e 2)) (setf s 1))
((or (= 1 (mod b 8)) (= 7 (mod b 8)))
(setf s 1))
((or (= 3 (mod b 8)) (= 5 (mod b 8)))
(setf s -1)))
(if (and (= 3 (mod b 4)) (= 3 (mod a1 4))) (setf s (- 0 s)))
(setf n1 (mod b a1))
(if (= 1 a1)
s
(* s (jacobi n1 a1)))))))
- Jacobi符号计算的一种实现
- Jacobi迭代法的C++代码实现
- 无符号整形压缩与解压缩的一种实现
- #公式与实现# Jacobi迭代的并行实现
- Jacobi 方法计算特征值特征向量
- 雅可比(Jacobi)迭代算法的C++实现
- 线性方程的Jacobi迭代法
- MATLAB的符号计算
- MATLAB的符号计算
- MATLAB的符号计算
- matlab的符号计算
- MATLAB的符号计算
- jacobi
- jacobi
- jacobi迭代法(C#实现)
- 用c#来实现一种行列式的计算优化
- 并行计算奇异值分解--Jacobi旋转
- JavaScript实现从不分计算符号的优先级左到右计算数学表达式
- SQL报错将截断字符串或二进制数据
- varchar、text和nvarchar、ntext类型的区别
- 存储过程参数Text类型的长度
- HDOJ 1272 小希的迷宫(并查集的应用)
- linux历程--时间编程
- Jacobi符号计算的一种实现
- nsis安装包(六)_向导脚本初级个性化
- Python调用C语言函数
- PHP中的MD5加密
- 用 Airdroid 管理 Android
- Java基础知识整理之异常篇
- 关于elf动态库的几篇文章
- BASE64编码之javascript类库BASE64.js
- Redis+Mysql模式和内存+硬盘模式的异同