TransWikia.com

Unexpected behaviour of SolveAlways

Mathematica Asked on December 28, 2020

My problem is quite simple and I cannot spot if this is my mistake or some malfunction of mathematica.

I am using

$Version
"12.0.0 for Linux x86 (64-bit) (April 7, 2019)"

Here is the code

W := 1/2 (D[h1[x, y], x] D[h2[x, y], x] + 
    D[h1[x, y], y] D[h2[x, y], y])
N1 := 1/2 (D[h1[x, y], x]^2 + D[h1[x, y], y]^2) h1[x, y] h2[x, y] - 
  1/2 (D[h1[x, y], x] D[h2[x, y], x] + 
     D[h1[x, y], y] D[h2[x, y], y]) h1[x, y]^2
N2 := 1/2 (D[h2[x, y], x]^2 + D[h2[x, y], y]^2) h1[x, y] h2[x, y] - 
  1/2 (D[h1[x, y], x] D[h2[x, y], x] + 
     D[h1[x, y], y] D[h2[x, y], y]) h2[x, y]^2
lsq := 2 Sqrt[N2/W]

I am making an ansatz for the two functions

h1[x, y] = a x + b y + e;
h2[x, y] = c x + d y + f;

Then I am using

sltn = SolveAlways[lsq == 1, {x, y}]

which gives me some solutions. However, when I run the command

Table[{lsq} /. sltn[[i]], {i, 1, 14}] // TableForm

to make sure that lsq is indeed one, the results are Indeterminate and ComplexInfinity

What is happening?

Add your own answers!

Ask a Question

Get help from others!

© 2024 TransWikia.com. All rights reserved. Sites we Love: PCI Database, UKBizDB, Menu Kuliner, Sharing RPP