2438.sagews

A=matrix(ZZ,9,[
0,0,0, 0,5,4, 1,0,0,
0,8,9, 0,3,7, 5,0,0,
3,1,0, 0,0,0, 0,0,0,
6,2,0, 0,0,8, 0,0,0,
0,9,0, 0,0,0, 0,3,0,
0,0,0, 9,0,0, 0,1,8,
0,0,0, 0,0,0, 0,7,9,
0,0,4, 7,1,0, 0,6,0,
0,0,2, 5,4,0, 0,0,0])

sudoku(A)

[2 6 7 8 5 4 1 9 3] [4 8 9 1 3 7 5 2 6] [3 1 5 6 9 2 8 4 7] [6 2 1 3 7 8 9 5 4] [5 9 8 4 6 1 7 3 2] [7 4 3 9 2 5 6 1 8] [1 5 6 2 8 3 4 7 9] [8 3 4 7 1 9 2 6 5] [9 7 2 5 4 6 3 8 1]

plot([x+3,x^2-2*x+3],(x,-2,5))

solve(x+3==x^2-2*x+3,x)

[x == 0, x == 3]

integrate((x+3)-(x^2-2*x+3),(x,0,3))

9/2

u,v=var('u,v');
fx = (2*sqrt(0.84)*cosh(0.4*u)*(-(sqrt(0.84)*cos(v)*cos(sqrt(0.84)*v))
- sin(v)*sin(sqrt(0.84)*v)))/(0.4*((sqrt(0.84)*cosh(0.4*u))^2
+ (0.4*sin(sqrt(0.84)*v))^2));
fy = (2*sqrt(0.84)*cosh(0.4*u)*(-(sqrt(0.84)*sin(v)*cos(sqrt(0.84)*v))
+ cos(v)*sin(sqrt(0.84)*v)))/(0.4*((sqrt(0.84)*cosh(0.4*u))^2
+ (0.4*sin(sqrt(0.84)*v))^2));
fz = -u
+ (2*0.84*cosh(0.4*u)*sinh(0.4*u))/(0.4*((sqrt(0.84)*cosh(0.4*u))^2
+ (0.4*sin(sqrt(0.84)*v))^2));
parametric_plot3d([fx, fy, fz], (u, -13.2, 13.2), (v, -37.4, 37.4),
plot_points=[90,90], frame=False, color="green")