2

我想 从 Python调用PARI/GPnfroots({nf}; x)的函数。（请参阅此链接中第 371 页的函数号 3.13.135.on :)，但问题是，我无法发送需要发送的代数表达式或多项式，例如，这是一个非常简单的示例四次多项式可以做什么：x^2-7x+12gp

> V = readvec("coeff.txt");
> print(V)
[1,-7,12]
> P = Pol(V);  # I get following error when I use Pol in my code:    func=self._FuncPtr((name_or_ordinal, self)) AttributeError: function 'pol' not found 
> print(P)
x^2 -7*x +12
> print(nfroots(,P))
>4, 3

从斯蒂芬施莱赫特的回答（点击这里），我设法写 -

from ctypes import *
pari = cdll.LoadLibrary("C:\\Program Files\\Pari64-2-11-3\\libpari.dll")

pari.stoi.restype = POINTER(c_long)
pari.cgetg.restype = POINTER(POINTER(c_long))

pari.nfroots.restype = POINTER(POINTER(c_long))


pari.pari_init(2 ** 19, 0)

def t_vec(numbers):
    l = len(numbers) + 1
    p1 = pari.cgetg(c_long(l), c_long(10)) #t_POL    =  10,
    for i in range(1, l):
        p1[i] = pari.stoi(c_long(numbers[i - 1]))
    return p1

def main():    
    h = "x^2-7x+12"
    res = pari.nfroots(t_vec(h))  
for i in range(1, len(res)):
         print(pari.itos(res[i]))
if __name__ == '__main__':
    main()

请注意，创建 PARI 对象有特定的过程（参见Stephan Schlecht的答案），我更改了 的值t_POL = 10，但代码不起作用，如何从 python 执行上述 PARI/GP 代码？

4

1 回答 1

3

一种解决方案可能是：

  • 使用 gtopoly，返回类型为POINTER(c_long)
  • nfroots 的返回类型是POINTER(POINTER(c_long))
  • 结果的输出.pari_printf

代码

from ctypes import *

pari = cdll.LoadLibrary("libpari.so")

pari.stoi.restype = POINTER(c_long)
pari.cgetg.restype = POINTER(POINTER(c_long))
pari.gtopoly.restype = POINTER(c_long)
pari.nfroots.restype = POINTER(POINTER(c_long))

(t_VEC, t_COL, t_MAT) = (17, 18, 19)  # incomplete
precision = c_long(38)

pari.pari_init(2 ** 19, 0)


def t_vec(numbers):
    l = len(numbers) + 1
    p1 = pari.cgetg(c_long(l), c_long(t_VEC))
    for i in range(1, l):
        p1[i] = pari.stoi(c_long(numbers[i - 1]))
    return p1


def main():
    V = (1, -7, 12)
    P = pari.gtopoly(t_vec(V), c_long(-1))
    res = pari.nfroots(None, P)
    pari.pari_printf(bytes("%Ps\n", "utf8"), res)


if __name__ == '__main__':
    main()

测试

如果您运行该程序，您将在调试控制台中获得所需的输出：

[3, 4]

转换

glength可以确定向量的长度，请 参阅https://pari.math.u-bordeaux.fr/dochtml/html/Conversions_and_similar_elementary_functions_or_commands.html#length

如果参数是t_INTitos类型，则可以返回 long，请参阅https://pari.math.u-bordeaux.fr/pub/pari/manuals/2.7.6/libpari.pdf的第 4.4.6 节。

在代码中它看起来像这样：

pari.glength.restype = c_long
pari.itos.restype = c_long
... 
print("elements as long (only if of type t_INT): ")
for i in range(1, pari.glength(res) + 1):
    print(pari.itos(res[i]))

ToGENtostr给出参数的字符串表示。它可以像这样使用：

pari.GENtostr.restype = c_char_p
...
print("elements as generic strings: ")
for i in range(1, pari.glength(res) + 1):
    print(pari.GENtostr(res[i]).decode("utf-8"))

还有更多转换选项，请参见上面的两个链接。

于 2020-03-23T07:15:34.927 回答