vv

12453 Reputation

19 Badges

9 years, 282 days

MaplePrimes Activity


These are replies submitted by vv

@JAMET In the context of my answer,

qq:=q(6,-6):
Delta:=diff(qq,x,y)^2-diff(qq,x,x)*diff(qq,y,y);

==> Delta := -108144 ==> ellipse

@Carl Love I agree in general, but not in this case. 

@JAMET 
1. Use the equations of the lines passing thru each pair of points.
2. You must find the equation of the conic first. Then you may use the geometry package.

@emendes Just curious: do you really need all the computations done in advance? Or is it a CPU test?
It is not difficult to write a compilable version, but actually Maple in not needed for this problem, so why not use e.g. C?

@Katatonia 

SYS1:=u>=0, r^2 - 2*r*c -r +2*c = u^2, -r+c+1+u>0,  0<=c, c<=1 , 0<r, r<1, r<2*c:
SolveTools:-SemiAlgebraic([SYS1], [r,u], parameters=[c]);

    

(Here, of course, the auxiliary variable u can be ignored when reading the answer.)

@s265344 I see now that you want real solutions. My answer is for complex ones and for your first version.
For the second one use Sys:=(lhs-rhs)~(sys);  but the conclusion is the same.
For real solutions it's more difficult; don't use a1>0 because the algorithms used by Maple are different and the system is too large for them.

For real solutions the DirectSearch approach could be OK but we must be sure not to obtain just an approximation of the null solution.

@Kitonum Unfortunately we should admit that this is just a speculation, Maple does not manage such problems. It does not work if we write {Limit(u(x, t), x=infinity)=0, Limit(u(x, t), x=-infinity)=0} or  {limit(u(_X, t), _X=infinity)=0, limit(u(_X, t), _X=-infinity)=0}.

Also, it does not work for A := int(diff(sin(x)*u(x,t),x), x=-infinity..infinity, continuous);

@mmcdara Once we know the cause, a workaround is simple. In your code, instead of instance := sol(...), just use:

instance := convert(sol(parameters=data), `global`);

 

 

@Earl The use of complex numbers is not essential, it is just a convenient way to obtain orthogonal coordinates (and conformal maps).

@Kitonum I think that the OP obviously knew the answer, and just wanted an explanation.

The question is not very clear. What means that f is continuous over an interval J? Must f be continuous at each point of J, or the restriction f|J must be continuous? How e removable discontinuity is it treated?

Note. Suppose that discont returns the empty set. We cannot conclude that f is continuous on R, because probably discont ignores the branches which define f (even if usually they are chosen such that f be continuous on R when possible).

 

@Assinat 

A^+ is the transpose of the matrix A. 

column-red.mw


 

B:=Matrix(8, 8, [[1, -7, 0, 0, 0, 0, 0, 0], [-3, 21, 0, 0, 0, 0, 0, 0], [-1, 8, 1, -7, 0, 0, 0, 0], [2, -17, -3, 21, 0, 0, 0, 0], [1, -8, -1, 8, 1, -7, 0, 0], [-2, 9, 2, -17, -3, 21, 0, 0], [-1/3, 16/3, 1, -8, -1, 8, 1, -7], [4/3, -3, -2, 9, 2, -17, -3, 21]]);

Matrix(8, 8, {(1, 1) = 1, (1, 2) = -7, (1, 3) = 0, (1, 4) = 0, (1, 5) = 0, (1, 6) = 0, (1, 7) = 0, (1, 8) = 0, (2, 1) = -3, (2, 2) = 21, (2, 3) = 0, (2, 4) = 0, (2, 5) = 0, (2, 6) = 0, (2, 7) = 0, (2, 8) = 0, (3, 1) = -1, (3, 2) = 8, (3, 3) = 1, (3, 4) = -7, (3, 5) = 0, (3, 6) = 0, (3, 7) = 0, (3, 8) = 0, (4, 1) = 2, (4, 2) = -17, (4, 3) = -3, (4, 4) = 21, (4, 5) = 0, (4, 6) = 0, (4, 7) = 0, (4, 8) = 0, (5, 1) = 1, (5, 2) = -8, (5, 3) = -1, (5, 4) = 8, (5, 5) = 1, (5, 6) = -7, (5, 7) = 0, (5, 8) = 0, (6, 1) = -2, (6, 2) = 9, (6, 3) = 2, (6, 4) = -17, (6, 5) = -3, (6, 6) = 21, (6, 7) = 0, (6, 8) = 0, (7, 1) = -1/3, (7, 2) = 16/3, (7, 3) = 1, (7, 4) = -8, (7, 5) = -1, (7, 6) = 8, (7, 7) = 1, (7, 8) = -7, (8, 1) = 4/3, (8, 2) = -3, (8, 3) = -2, (8, 4) = 9, (8, 5) = 2, (8, 6) = -17, (8, 7) = -3, (8, 8) = 21})

(1)

K := LinearAlgebra:-NullSpace(B); k:=nops(K):

{Vector(8, {(1) = 0, (2) = 0, (3) = 0, (4) = 0, (5) = 49, (6) = 7, (7) = 0, (8) = 1}), Vector(8, {(1) = 0, (2) = 0, (3) = 0, (4) = 0, (5) = -7, (6) = -1, (7) = 1, (8) = 0})}

(2)

It seems that you want a column reduction:

(LinearAlgebra:-ReducedRowEchelonForm(`<|>`(K[])^+))[[seq(k..1,-1)]]^+;

Matrix(8, 2, {(1, 1) = 0, (1, 2) = 0, (2, 1) = 0, (2, 2) = 0, (3, 1) = 0, (3, 2) = 0, (4, 1) = 0, (4, 2) = 0, (5, 1) = 0, (5, 2) = 1, (6, 1) = 0, (6, 2) = 1/7, (7, 1) = 1, (7, 2) = 0, (8, 1) = 1/7, (8, 2) = 1/49})

(3)

 

 

@Carl Love Not quite. E.g. for p=1 your result is complex.
 

@Earl  The proc uses practically "homogeneous coordinates". See Homogeneous coordinates - Wikipedia and the references therein. You may want to check directly that the image under f of three collinear points are also collinear. 

First 27 28 29 30 31 32 33 Last Page 29 of 166