1234567891011121314151617181920212223242526272829303132333435 |
- var('tau')
- def C_int(dx,dy):
- return -1/pi*integral(1/tau*(1-((tau-I)/(tau+I))**(dx-dy)*((tau-1)/(tau+1))**(dx+dy)),tau,0,infinity)
-
- def C_diag(m):
- return -2/pi*(harmonic_number((2*m-1)/2)+log(4))
- var('c1','c2','c3','c4','c5')
- var('x')
- l=[0,c1,c2,c3,c4,c5]
- l=[0,-4*x,-4*x*(1+1/3),-4*x*(1+1/3+1/5),-4*x*(1+1/3+1/5+1/7)]
- def c(i,j):
- if i>j:
- return c(j,i)
- if (i,j)==(0,1):
- return -1
- if i==j:
- return l[i]
- if i==0:
- return 4*c(0,j-1)-c(0,j-2)-2*c(1,j-1)
- if i==j-1:
- return 2*c(j-1,j-1)-2*c(j-2,j)
- return 4*c(i,j-1)-c(i,j-2)-c(i-1,j-1)-c(i+1,j-1)
- var('k')
- def d(i,j):
- if i>j:
- return d(j,i)
- r=1
- for k in range(j):
- r=r*(2*k+1)
- return r*c(i,j)
|