The calculator

[Gunther]

Dave,

Gunther....
sin(45) is a constant   :P

yes, that's true. But the value is sqrt(2)/2 which is irrational. 

Gunther

[dedndave]

constants can be irrational - take my wife, for example   :lol:

[Gunther]

Dave,

constants can be irrational - take my wife, for example   :lol:

I hope she didn't read your posts, otherwise ...  :lol:

Gunther

[RuiLoureiro]

No, that wouldn't be a linear equation system, because the sine is bent. You're talking about a non-linear equation system. That's not so easy to solve and most of these systems can only be solved approximately. That's another point.
Gunther

Gunther,

        If the constants are real (like, 1, 1.2, pi, sqrt(5),...)
        the system is a linear equation system.

        The system is non-linear in x if we use sin(x) instead of x
        or x^2, e^x, ...

        For instance:  2 sin(3t) x+  y=5
                               2 x           - 3y=10       for instance: t={1,2,...}
--------------------------------------------------------------------
        For each t, we get a real number A=2*sin(3t),
        we have a linear equation system,
        we may solve it, we may have or not a solution,
        etc. etc.
---------------------------------------------------------------------
        But this:     2 sin(3x)+  y =5
                            2 x        - 3y=10
        is a non-linear equation system
        and what you said is correct.

[RuiLoureiro]

constants can be irrational - take my wife, for example   :lol:

(...)

[RuiLoureiro]

 
Gunther,
          you tried to show us an example of
          a linear equation system A
          that you say "it has one property"
          and another linear equation system B
          that you say "it has another property".
          Now, i show that they have the same:
          the question is the starting point.

This is what you wrote
-----------------------------

My question has that background:
Given is the following linear equation system A:
x -  2y = 1
x + 1y = 4

The solution is: x = 3 and y = 1
If we change the coefficients a bit, we've the system A':
x -     2y = 1
x + 1.2y = 4

The solution is now: x = 2.875 and y = 0.9375
But the relationship between the two solutions is still recognizable.

    Well,
    Do this:
                (1) replace +1y  by +ay where "a" is a real number
    we get:
                    x - 2y = 1
                    x + ay = 4
           
                (2) study this system
                    (if you know how to do that.
                    (explanations: $150 per hour. very cheap!).
    we get:
                    if a = -2 the system has no solution
                    if a<>-2 the system has a unique solution

                Using "The calculator", we get:

                x-2y=1; x-   2y=4; The System of linear equations has no solution                 
                x-2y=1; x-1.9y=4; X=  61.0   Y=  30.0   Determinant:  0.1
                x-2y=1; x-2.1y=4; X= -59.0   Y= -30.0   Determinant: -0.1               

                Well, if we want to be far from a=-2, we may choose a=1 or a=200

          x-2y=1; x+200y=4; X=1.0297029702970297  Y=0.01485148514851485
          x-2y=1; x+201y=4; X=1.0295566502463054  Y=0.0147783251231527
          ...

Following what you call "an ill conditioned linear equation system",
i would say: that's a simple example of "an ill conditioned linear equation system",and this is your linear equation system A.

Well, you may say: the starting point is the first equation system.
And my question is: why to change "1" and no "-2" or "4" or other ?
-----------------------------------------------------------------------------------
This is what you wrote
----------------------------

Lets have a look at the following system B:
x   +     2y  = 3
2x +  4.1y = 4

            Doing the same
           
    we get:
                    x +  2y = 3
                   2x + ay = 4

    studying the system:
   
                    if a = 4  the system has no solution
                    if a<>4  the system has a unique solution

                Using "The calculator", we get:

                    x+2y=3; 2x+   4y=4;  The System of linear equations has no solution
                    x+2y=3; 2x+3.9y=4;  X= -37.0   Y=  20.0   Determinant: -0.1
                    x+2y=3; 2x+4.1y=4;  X=  43.0   Y= -20.0   Determinant:  0.1

---------------------------------------------------------------------------
my conclusion is this: 

          The calculator should solve the linear equation system with
          real constant coefficients;
          We may study the system, if and when we want;
          You can call the name you want, for me, no problems.
---------------------------------------------------------------------------
I want to remember that many of us are here
doing this things to do something useful or
to pass the time, no to get more problems
for our lives

I will post the NEXT version v3.10.2 (calcula60.exe)
soon as possible

[Gunther]

Hi Rui,

        But this:     2 sin(3x)+  y =5
                            2 x        - 3y=10
        is a non-linear equation system
        and what you said is correct.

no doubt about that.

I want to remember that many of us are here
doing this things to do something useful or
to pass the time, no to get more problems
for our lives

That's clear. It wasn't my matter of concern to make you problems.

          Now, i show that they have the same:

That's not my point of view. I want you cause no further problems; therefore I won't answer in detail. Only that: The condition of a linear equation system is a measure for the behavior of the system. If we call M the matrix of the coefficients, it's defined as:

cond (M) = ||M|| ||M^-1||

or formulated in a sentence: The condition of a linear equation system is the norm of the matrix M multiplied by the norm of the inverse matrix of M. The system A has a much better condition than system B. That's the difference.

But again, I don't want that you've further problems in your spare time. You may ignore this point. Anyway, your Calculator is a solid work. Thank you for that.

Gunther 

[RuiLoureiro]

Hi Gunther,

That's clear. It wasn't my matter of concern to make you problems.

          I wanted to say the same to you

That's not my point of view.
...
The system A has a much better condition than system B.
That's the difference.

         It's clear: now, i understand your point of view.
         Well, nothing to say: i showed my point of view.         
         Thank you for that, also.  :icon14:
         RuiLoureiro

Anyway, your Calculator is a solid work.

                :t

[RuiLoureiro]

Hi all,                               
-----------------------------------------------------------------------
                              LASTEST VERSION
-----------------------------------------------------------------------
        ****-- The (powerful) Calculator v3.10.2 --****
                                 (calcula60.exe)
                       
        This is the lastest version and this is the powerful calculator
        v3.10.2

            ---------------------------------------------------------------
            COMPLEX NUMBERS and COMPLEX FUNCTIONS
            ---------------------------------------------------------------

        Now, we may solve any complex expression in the same way we do for
        real expressions.

        We may use any function:

                                z= a + i b          (a,b are reals, i^2=-1)
                                  = |z| e^(i.angleR)

                conj(a+ib)      = a-ib
                inv(z)             = 1/z

                abs(a+ib)       = sqr(a^2+b^2)+i0
                sqr(a+ib)       = (a+ib)^(1/2)
                rnd(a+ib)       = rnd(a)+i rnd(b)
                rndi(a+ib)      = rndi(a)+i rndi(b)
       
                e^(a+ib)        = e^a * e^ib = e^a * ( cos(b)+i sin(b))

                (a+ib)^(c+id)   = e^( (c+id)*ln(a+ib) )
               
                ln(a+ib)        = ln (|a+ib|* e^i angleR )
                log(a+ib)       = (ln (|a+ib|* e^i angleR )) / ln(10)
               
                sin(z)          = (e^iz - e^-iz)/2i
                cos(z)          = (e^iz + e^-iz)/2
                tan(z)          = (e^2iz - 1) / i (e^2iz + 1)
                sec(z)          = 1 / cos(z)
                csc(z)          = 1 / sin(z)
                cot(z)          = 1 / tan(z)
               
                arcsin(z)       = -i  * ln(i*z + sqrt(1-z^2))   
                arccos(z)       = -i  * ln(z +i sqrt(1-z^2))
                arctan(z)       = i/2 * ln((i+z) / (i-z))
                arcsec(z)       = arccos(1/z)
                arccsc(z)       = arcsin(1/z)
                arccot(z)       = arctan(1/z)

                sind(z)
                cosd(z)
                tand(z)
                secd(z)
                cscd(z)
                cotd(z)

                arcsind(z)
                arccosd(z)
                arctand(z)
                arcsecd(z)
                arccscd(z)
                arccotd(z)

                sinh(z)         = (e^z - e^-z) / 2
                cosh(z)         = (e^z + e^-z) / 2
                tanh(z)         = (e^2z - 1) / (e^2z + 1)
                sech(z)         = 1 / cosh(z)
                csch(z)         = 1 / sinh(z)
                coth(z)         = 1 / tanh(z)

                arcsinh(z)      = ln(z + sqrt(z^2+1))
                arccosh(z)      = ln(z + sqrt(z^2-1))
                arctanh(z)      = 1/2 * ln((1+z) / (1-z))
                arcsech(z)      = arccosh(1/z)
                arccsch(z)      = arcsinh(1/z)
                arccoth(z)      = arctanh(1/z)
               
                round(a+ib, n)  - round 'a' and 'b' to n decimal places

        The operation rules are the same for real numbers

        The result may be a complex number, INFINITY or indeterminate form.
        We may use the division by 0 to generate th infinity.

        We need to use brackets when we have powers of powers

        (1-i2)^(1-i)^(i2) gives "Complex power too complex- use brackets"

        We need to do ((1-i2)^(1-i))^(i2) or (1-i2)^((1-i)^(i2)).

        Any complex number is a number with a real part 'a'
        and an imaginary part 'b'. For instance, z1=-2+i3 or z1=i3-2.

        We may define it typing z1=(-2,3); or z1=-2+i3 for example.

        To build a complex expression
        we may define a set of real/complex constants z1, z2, z3, z4, ...
        and then we write the expression

        For instance,

                (1-i2)*(2-i3)  or (a-ib)*(c-id) where a=12;b=-4;c=1;d=-3;
                                                are real constants

                z1+z2*z3-z4   or  z5=z1+z2*z3-z4  or z1=z1+z2*(z3/z4)+3-i2

        If the expression uses '^', we may use brackets or constants
        previously defined. See the following example:

            z1=(e^i*(2-i3)+ e^-i*(2-i3) ) /2 =  1.0806046117362794-i1.6209069176044192

        is not equal to
       
            z2=(e^(i*(2-i3))+ e^(-i*(2-i3)) ) /2 = -4.1896256909688072+i9.1092278937553366

            cos(2-i3)=-4.1896256909688072+i9.1092278937553366

        but is equal to

            x1=i*(2-i3)
            x2=-x1

            z3=(e^x1+e^x2)/2 = -4.1896256909688072+i9.1092278937553366

        After defining any constant/matrix we may type the constant name
        to see its value. We may use also list c or list r or list l or
        list.

        To delete all defined variables, type: del a (delete all)

        If you know any bug or something else, please post it       
        If you have any suggestion, please send me a personal message or ...

        I hope i have not did many mistakes!

        What will coming next ?
       
        Maybe the function norm(a), where a=matrix
        and something about complex numbers.
        ---------------------------------------------------------
        Nov. 2013

        Good luck !
        Rui Loureiro

        note:   RulesV3_10_2I   - rules in English
                   RulesV3_10_2P   - regras em Português

[Gunther]

Rui,

impressive. You are a hard working man.  :t Thank you for providing.

Gunther

[RuiLoureiro]

Rui,
impressive. You are a hard working man.  :t Thank you for providing.
Gunther

            Thank you, Gunther   :t

Hi all,                               
-----------------------------------------------------------------------
                              LASTEST VERSION
-----------------------------------------------------------------------
        ****-- The (powerful) Calculator v3.11.1 --****
                               (calcula61.exe)
                       
        This is the lastest version and this is the powerful calculator
        v3.11.1

            ---------------------------------------------------------------------
            LINEAR EQUATION SYSTEMS WITH COMPLEX VARIABLES
                                  NORM of a MATRIX           
            ---------------------------------------------------------------------
        Now, we may solve linear equation systems with complex variables,
        and we may compute the norm of a matrix.

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
                           Systems of 2 complex variables x,y
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

-------------
example 1
-------------
type the following lines (for each one, press COMPUTE)
or copy and paste:

z1=1-i2
z2=2+i3

x1=3;x2=5;x3=-7;

x1 X+ x2 Y=z1; x2 X- x3 Y=z2;

X=  0.75+i7.25
Y= -0.25-i4.75
Determinant: -4.0+i0
----------------------------------------
PROOF:

    type the following lines ( press COMPUTE):

X1=  0.75+i7.25
Y1= -0.25-i4.75

w1= x1*X1+ x2*Y1
  = 1.0-i2.0     = z1
 
w2= x2*X1- x3*Y1
  = 2.0+i3.0     = z2
---------------------------------------
------------
example 2
------------
    type the following lines ( press COMPUTE):

z1 X+ x2 Y=x1; x2 X- z2 Y=x2;
X=  0.9302752293577981+i0.3009174311926605 
Y=  0.2935779816513761+i0.3119266055045871
Determinant: -33.0+i1.0


++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
                       Systems of 3 complex variables x,y,z
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

------------
example 3
------------
type the following lines (for each one, press COMPUTE):

z1=1-i2
z2=2+i3

x1=3;x2=5;x3=-7;
x+y-x3 z=z1; x2 x-iy+2z=20; (x1+ix2)x+2y-z=8;

result:
X=  5.4763271162123386-i2.6248206599713056
Y= -10.3565279770444763-i9.0616929698708752
Z=  0.8400286944045911+i1.3837876614060258
Determinant:  42.0+i32.0
-------------------------------------------------
------------   
example 4
------------
type the following line ( press COMPUTE):

x+y-x3 z=z1; x2 x-iy+2z=20; z2 x+2y-z=x1+ix2;

result:
X=  4.5773011617515639-i1.0393208221626452
Y= -4.5656836461126005-i3.1689008042895442
Z=  0.1411974977658623+i0.3154602323503127
Determinant:  54.0+i21.0

PROOF:

    type the following lines ( press COMPUTE):

    X1=  4.5773011617515639-i1.0393208221626452
    Y1= -4.5656836461126005-i3.1689008042895442
    Z1=  0.1411974977658623+i0.3154602323503127


w1=   X1+   Y1-x3* Z1
  =0.9999999999999995-i2.0000000000000005 = z1=1-i2

w2=x2*X1-i* Y1+2*  Z1
  =20.0-i9.9746599868666408e-17 = 20

w3=z2*X1+2* Y1-    Z1
  =3.0000000000000001+i5.0000000000000002 = x1+ix2 = 3+i5

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
                      Systems of 4 complex variables x,y,z,t
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

--------------------------------
example 5: real variables
--------------------------------
    type the following line ( press COMPUTE):

x+y+z+t=10; -x-y+2z+2t=20; 3x+2y-z-3t=8; -2x+y+z-5t=18;

X=  7.6666666666666667
Y= -7.6666666666666667
Z=  15.1666666666666667
T= -5.1666666666666667
Determinant: -36.0

    type the following line ( press COMPUTE):

matA=[1,1,1,1;  -1,-1,2,2;  3,2,-1,-3; -2,1,1,-5];
det(matA)=-36.0
The triangular matrix is correct
--------------------------------------------------------
------------
example 6- same as example 5
------------
    type the following line ( press COMPUTE):

x+y+z+t=10; -x-y+2z+2t=20; 3x+2y-z-3t=8; -2x+y+z-5t=18+i0;

X=  7.6666666666666667+i0
Y= -7.6666666666666667+i0
Z=  15.1666666666666667+i0
T= -5.1666666666666667+i0
Determinant: -36.0+i0
----------------------------------------------------------
------------
example 7
------------
    type the following line ( press COMPUTE):

x+iy+z+t=10; -x-y+2z+2t=20; 3x+2y-z-3t=8; -2x+y+z-5t=18+i0;

X=  5.1111111111111111-i2.5555555555555556
Y=  0+i7.6666666666666667
Z=  15.1666666666666667+i0
T= -2.6111111111111111+i2.5555555555555556
Determinant:  0-i36.0
----------------------------------------------
PROOF:

    type the following lines ( press COMPUTE):

X1=5.1111111111111111-i2.5555555555555556
Y1=0+i7.6666666666666667
Z1=15.1666666666666667+i0
T1=-2.6111111111111111+i2.5555555555555556

W1=X1+i*Y1+Z1+T1
  =10.0+i0

W2=-X1-Y1+2*Z1+2*T1
  =20.0+i0.0000000000000001

W3=3*X1+2*Y1-Z1-3*T1
  =7.9999999999999999-i1.9949319973733282e-16

W4=-2*X1+Y1+Z1-5*T1
  =18.0-i0.0000000000000001
----------------------------------------------
------------
example 8
------------
    type the following lines ( press COMPUTE):

z1=1-i2
z2=2+i3

x1=3;x2=5;x3=-7;

z1 x+iy+z+t=x1-ix2; -x-z2 y+2z+2t=20; 3x+2y-z1 z-3t=8; -2x+y+z-5t=18+i2;

X=  5.2599406528189911-i7.4712166172106825
Y=  5.7750741839762611+i2.2890207715133531
Z=  16.267062314540059+i3.4747774480712166
T= -1.2955489614243323+i3.7412462908011869

Determinant: -46.0-i68.0
----------------------------------------------
PROOF:

    type the following lines ( press COMPUTE):

X1=  5.2599406528189911-i7.4712166172106825
Y1=  5.7750741839762611+i2.2890207715133531
Z1=  16.267062314540059+i3.4747774480712166
T1= -1.2955489614243323+i3.7412462908011869

w1= z1*X1+ i* Y1+   Z1+  T1
  = 2.9999999999999997-i5.0000000000000001 = x1-ix2 =3-i5
 
w2=   -X1-z2 *Y1+2* Z1+2*T1
  = 19.999999999999999+i0 = 20
 
w3= 3* X1+2*  Y1-z1*Z1-3*T1
  = 8.0000000000000002-i6.0108168442596366e-16 = 8
 
w4=-2* X1+    Y1+   Z1-5*T1
  = 17.999999999999999+i2.0000000000000002 = 18+i2
;«««««««««««««««««««««««««««««««««««««««««««««««««««
                             NORM of a MATRIX
;«««««««««««««««««««««««««««««««««««««««««««««««««««
    type the following lines ( press COMPUTE):
matA=[1,-2; -3, 4];
norm(matA) 

we get:
norm -max. of the sum of each line (matA)= 7.0
norm -max. of the sum of each column (matA)= 6.0

[Gunther]

Hi Rui,

only one thing: Wow!  :t

Gunther

[RuiLoureiro]

 
Hi Gunther
                       :t

Hi all,
        This is only to say that "The powerful calculator" (calcula62)
        is near to use matrices with COMPLEX NUMBERS.
        I need only to do some tests.       
        RuiLoureiro

Hi qWord,
        When i post calcula62, could you test it with matlab ?
        Ok, thank you  :t
       
See this:

Do:
        matX=[1+i2,9-i3; 3-i5.4, 4+i1.2];
We get:
        The complex matrix is defined

Do:
        matY=matX^-1;
We get:       
        matY=[0.0095362094447181-i0.061193609684003, 0.0622844675909634+i0.1261524385952565;
              0.0854036174255753+i0.0331480047856992,0.027359420085861 -i0.0187381237244];
        The complex matrix is defined
        Errors in the identity matrix are below 1e-18
        The inverted matrix is correct
-------------------------------------------------
Do:

Code: [Select]

matA=[1, 2, 3, 2, 0, 2,1,-2, 3, 2,0,1  ; 1, 4,5, 6, 0, 3,-5, 0, 1, 2, 7,0 ; -3, 0, 7,-2,-3,5,1 ,-1, 2,9,-2,0;
      9, 1, 1, 3, 4, 6,2, 5, 6, 8,2,3  ; 1,-1,1,-1, 8, 0, 4, 1,-1, 0, 5,1 ;  2,-1,-5, 2, 0,5,7 ,-9, 3,5,-3,1;
      2, 3, 1, 3, 5, 6,4, 5,-6,-8,7,0  ;-1,-3,1,-7,-8, 0, 0, 2,-5, 3, 4,1 ; 12,-4, 5, 7, 1,0,2 , 0,-3,0,-4,-1;
      1,-1, 1,-1,-9,-3,5,-7, 2, 2,1,-1 ; 0,-5,3,-2,-1,-7, 6,-1,-2,-5,-2,8 ;  0, 0, 1,-3, 0,1,-5,-2, 0,1, 5,1+i0];   

We get:
The complex matrix is defined

Do:
    matB=matA^-1;

We get:

Code: [Select]

matB=[0.3489475139105589+i0,-0.077717764135831+i0,-0.1305663289999746+i0,
-0.01189321415923582+i0, 0.030658417448943+i0,-0.01544063546736273+i0,
-0.032359956048502+i0, 0.12026503888873099+i0, 0.0563587763184989+i0,
-0.0469873206919989+i0,-0.0552819588513436+i0, 0.0028764341340867+i0;
1.2038253746424853+i0,-0.0737862490216782+i0,-0.3707567189349224+i0,
-0.1747472582414871+i0, 0.1591538921209745+i0,-0.0028790830112823+i0,
-0.1494282660592322+i0, 0.4412261789225444+i0, 0.01548276728050134+i0,
-0.2686901806756077+i0,-0.1567441075089298+i0,-0.2763391412739283+i0;
0.0187343364849522+i0,-0.0207830852282367+i0, 0.0772439172493358+i0,
-0.01210186072460702+i0, 0.0069412698217746+i0,-0.055170392364791+i0,
0.0258755788715113+i0,-0.0499767559328416+i0, 0.0257864718665081+i0,
0.0349311858466001+i0, 0.0159887049951585+i0, 0.0485851419165665+i0;
-0.3314381496330013+i0, 0.149112029548901+i0, 0.0633701813335249+i0,
0.0279434023893145+i0,-0.043087392918502+i0, 0.0414049652003719+i0,
0.01215734823711377+i0,-0.0944356492076842+i0,-0.0062092805019976+i0,
0.036984525440662+i0, 0.0541658475877536+i0,-0.058825516372493+i0;
0.1306324231186913+i0,-0.0212040294890572+i0,-0.0315844618695761+i0,
-0.0359397656450297+i0, 0.0930859455477016+i0, 0.006451085834335+i0,
-0.0357521157353953+i0, 0.0202766124971702+i0, 0.01438058210203112+i0,
-0.0674981469058792+i0,-0.0234276869891709+i0,-0.0083228389532894+i0;
-0.3692504255738974+i0,-0.021892117367119+i0, 0.1657167584891193+i0,
0.0705876315716985+i0,-0.1292871530040815+i0, 0.026429924473778+i0,
0.1266082036440829+i0,-0.164592953418614+i0,-0.01335398125911003+i0,
0.0718698527221532+i0, 0.0405050165976217+i0, 0.1594134514897885+i0;
0.0490849707981281+i0,-0.0171928398021129+i0,-0.00158264398711094+i0,
0.0022457425854745+i0, 0.0498990230369092+i0, 0.0029350115469339+i0,
0.0180160649764132+i0, 0.0216114527675041+i0,-0.01354256886325167+i0,
0.0354693568163014+i0,-0.0026549908694263+i0,-0.087100970997439+i0;
-0.2044568349995381+i0, 0.01297154108852978+i0, 0.0532421387390865+i0,
0.0737142372186105+i0,-0.0384820735367924+i0,-0.047213045317213+i0,
0.0295741565155512+i0,-0.0456359070616521+i0,-0.026393327801645+i0,
0.0326274528589774+i0, 0.0201915799013743+i0,-0.0406533648942984+i0;
-0.5932972720613709+i0,-0.0209918266600847+i0, 0.2026367180091205+i0,
0.1572055516251538+i0,-0.1259187657287346+i0,-0.0612563733893335+i0,
0.10269198782892028+i0,-0.3301642954853802+i0,-0.0588064472272272+i0,
0.2259098962133411+i0, 0.0763407165237221+i0, 0.1953977685856945+i0;
0.3182471547714092+i0, 0.0517233171449673+i0,-0.10861579851959029+i0,
-0.055216064571107+i0, 0.11886820932720037+i0, 0.0414594815056652+i0,
-0.1230670565368351+i0, 0.2047330641547552+i0, 0.01459943016238838+i0,
-0.12498644339395018+i0,-0.0577935633223318+i0,-0.1656982226986158+i0;
-0.2799018148394809+i0, 0.068480479218752+i0, 0.0509548448741404+i0,
0.0509176474488098+i0, 0.01172613482006036+i0,-0.0045568810249207+i0,
0.0402069822428226+i0,-0.0780196840570518+i0,-0.0297156907710767+i0,
0.10156931114386624+i0, 0.0259680263379561+i0, 0.062108712424104+i0;
0.2739747436075013+i0, 0.0358644611698261+i0,-0.10043750004637351+i0,
-0.01537054898749617+i0,-0.01188421088973993+i0, 0.0545292542113109+i0,
-0.0447509545683625+i0, 0.1334135675731232+i0,-0.0175808083399441+i0,
-0.1361058847726861+i0, 0.0610654582586491+i0,-0.0461320667215304+i0];

The complex matrix is defined
Errors in the identity matrix are below 1e-18
The inverted matrix is correct
-----------------------------------------------------------------
Do:
matR=[1, 2, 3, 2, 0, 2,1,-2, 3, 2,0,1  ; 1, 4,5, 6, 0, 3,-5, 0, 1, 2, 7,0 ; -3, 0, 7,-2,-3,5,1 ,-1, 2,9,-2,0;
      9, 1, 1, 3, 4, 6,2, 5, 6, 8,2,3  ; 1,-1,1,-1, 8, 0, 4, 1,-1, 0, 5,1 ;  2,-1,-5, 2, 0,5,7 ,-9, 3,5,-3,1;
      2, 3, 1, 3, 5, 6,4, 5,-6,-8,7,0  ;-1,-3,1,-7,-8, 0, 0, 2,-5, 3, 4,1 ; 12,-4, 5, 7, 1,0,2 , 0,-3,0,-4,-1;
      1,-1, 1,-1,-9,-3,5,-7, 2, 2,1,-1 ; 0,-5,3,-2,-1,-7, 6,-1,-2,-5,-2,8 ;  0, 0, 1,-3, 0,1,-5,-2, 0,1, 5,1];   

The real matrix is defined

NOTE: this matR is equal matA
      ***********************
Do:
   matS=matR^-1;
The real matrix is defined
The identity matrix is correct

Code: [Select]

matS=[0.3489475139105589,-0.077717764135831,-0.1305663289999746,-0.01189321415923582,
0.030658417448943,-0.01544063546736273,-0.032359956048502, 0.12026503888873098,
0.0563587763184989,-0.0469873206919989,-0.0552819588513436, 0.0028764341340867;
1.2038253746424853,-0.0737862490216782,-0.3707567189349224,-0.1747472582414871,
0.1591538921209745,-0.0028790830112823,-0.1494282660592322, 0.4412261789225444,
0.01548276728050134,-0.2686901806756077,-0.1567441075089298,-0.2763391412739283;
0.0187343364849522,-0.0207830852282367, 0.0772439172493358,-0.01210186072460701,
0.0069412698217746,-0.055170392364791, 0.0258755788715113,-0.0499767559328416,
0.0257864718665081, 0.0349311858466001, 0.0159887049951585, 0.0485851419165665;
-0.3314381496330014, 0.149112029548901, 0.0633701813335249, 0.0279434023893145,
-0.043087392918502, 0.0414049652003719, 0.01215734823711377,-0.0944356492076842,
-0.0062092805019976, 0.036984525440662, 0.0541658475877536,-0.058825516372493;
0.1306324231186913,-0.0212040294890573,-0.0315844618695761,-0.0359397656450297,
0.0930859455477016, 0.006451085834335,-0.0357521157353953, 0.0202766124971702,
0.01438058210203112,-0.0674981469058792,-0.0234276869891709,-0.0083228389532894;
-0.3692504255738975,-0.021892117367119, 0.1657167584891193, 0.0705876315716985,
-0.1292871530040815, 0.026429924473778, 0.1266082036440829,-0.164592953418614,
-0.01335398125911003, 0.0718698527221532, 0.0405050165976217, 0.1594134514897885;
0.0490849707981281,-0.0171928398021129,-0.00158264398711094, 0.0022457425854745,
0.0498990230369092, 0.0029350115469339, 0.0180160649764132, 0.0216114527675041,
-0.01354256886325167, 0.0354693568163014,-0.0026549908694263,-0.087100970997439;
-0.2044568349995381, 0.01297154108852978, 0.0532421387390865, 0.0737142372186105,
-0.0384820735367924,-0.047213045317213, 0.0295741565155512,-0.0456359070616521,
-0.026393327801645, 0.0326274528589774, 0.0201915799013743,-0.0406533648942984;
-0.5932972720613709,-0.0209918266600847, 0.2026367180091205, 0.1572055516251538,
-0.1259187657287346,-0.0612563733893335, 0.10269198782892028,-0.3301642954853802,
-0.0588064472272272, 0.2259098962133411, 0.0763407165237221, 0.1953977685856945;
0.3182471547714092, 0.0517233171449673,-0.1086157985195903,-0.055216064571107,
0.11886820932720038, 0.0414594815056652,-0.1230670565368351, 0.2047330641547552,
0.01459943016238838,-0.12498644339395018,-0.0577935633223318,-0.1656982226986158;
-0.2799018148394809, 0.068480479218752, 0.0509548448741404, 0.0509176474488098,
0.01172613482006036,-0.0045568810249207, 0.0402069822428226,-0.0780196840570518,
-0.0297156907710767, 0.10156931114386624, 0.0259680263379561, 0.062108712424104;
0.2739747436075013, 0.0358644611698261,-0.10043750004637351,-0.01537054898749618,
-0.01188421088973993, 0.0545292542113109,-0.0447509545683625, 0.1334135675731232,
-0.0175808083399441,-0.1361058847726861, 0.0610654582586491,-0.0461320667215304];


[RuiLoureiro]

 
Hi
        --**** The calculator v3.12.1 ****--
                              calcula62

    This is the latest version.

    Now, we may do almost all operations with complex numbers,
    the same way we do for real numbers.

    In the next version, the calculator will do more
    matrix operations with real and complex numbers,
    i hope. And, i hope to do a general revision too.

    Dez. 2013

    Good luck !   
    RuiLoureiro

   
1. matrix definition:

a11=2.453 ;a12=-5.236 ;a21=9.123  ;a22=-3.154;
z11=(2,3) ; z12=(3,-2); z21=(8,-3); z22=(0,-5);

matA=[a11+ia12, a12-ia21; 0, 2+ia22];
matB=[z11, z12; z21, z22];

2. Operations:

    2.1  - ROUND

            round(matA, 1) or
           
            matC=round(matB, 1)

    2.2  - CONJUGATE

            conj(matA) or

            matC=conj(matB)

    2.3  - CHANGE

            - lines:         change l(matA;1,2) or
                        matX=change l(matA;1,2)

            - columns:       change c(matA;1,2) or
                        matY=change c(matA;1,2)

    2.4  - ADD,SUB,MUL (x=+,-,*)
                matX=matA x matB;

    2.5  - SCALAR:
   
                matX=-matB;

                matX=-2.3*matB;

                matX=(-2.3+i3.4)*matB;
               
    2.6  - TRANSPOSE:
   
                matX=matA^t;

    2.7  - INVERSE:
   
                matX=matA^-1;

    2.8  - DETERMINANT:
   
                det(matA)        - Gauss

                delta(matA)     - Laplace (note: more than 12x12 use Gauss)

---------------------
Inverse example
 20x20 matrix
---------------------

Code: [Select]

g=[1.23+i3,2,3,-4.45,5,6,7,-1.24,0,10,11,1.12,-13,14.11,15,-1.16,7,8,19,-4;
1,2.24,3,-4,5.23,6,7,8,9,-1.08,11,12,-13.23,14,15,16,-17,18.45,1,20;
1,0,3,4,5.23,-6,7,8,9,10,-2.11,0,-13.34,14,0,-16,17,18.58,19,-20;
1,2,1,0,0,6,7.25,8,9,10.12,0,12,13.45,14,15,16,17.21,18.29,-19.23,2;
-1,2.45,0,4,5,6,7.45,8,9,0,11,12,13,4,15,0,17.22,18.21,19,1;
1,2,3,4,5.24,6,0.27,8,9.89,10,11,2,-13,14,15,16,17,3,19,20;
20,9,18,17,16,5,14,13,12,11.38,10,9,8,7,6.34,5,4,3.25,2,-1;
1,2.23,-3,4,5,6,7,-1,9,10,11.45,12,13,14.89,15,-16,17,18,19,20;
1,0,3,-4,5,6,7.34,8.34,9,1,1,12.29,-13.59,14,5,16,17,18.34,19,20;
1,2,0,4,5,0,1,8,9,10,-11,12.24,13,14.22,15,16,17.45,18,19,20;
20,19.34,1.84,17,16,15,14.35,13,12.68,11,10,9,8.34,7,6.34,5,4,3,2,1;
1,2,3,4,5.24,6,7,8.24,9,10,11.23,12,13.34,14,15,-1,-17.23,1,19,1;
1,-2.81,1,4.23,5,6.21,7,8.89,9,10,11,0,13,14,15,16,17,18,19.23,20;
-1,2,3,4,5,-6.23,-7,8,9,10,1,12,13,-14,15.33,6,17,18,19,20;
1,0,0,4,5,6.34,7,8,9,10,-11.89,1.23,13,14.34,15.21,16.34,0,18,19,20;
1.34,2,3,4,5,6.23,7,0,9,0,11,0,1.35,14,15,16.62,17,18,1.92,0;
1,-2,3,4,5.45,6,1,-8,9,10,1.12,12,13,14,15,-16,17.43,2,19,0;
1,2,1,0,-1,6,7,8,9,10,11,-12.23,13,14,15,16,17,18,0,20.23;
-1.45,1,3,4.56,0,6,7,0,9,10,11,0,13.34,14,-15,16,7,18,9.34,20;
1,2,3,-4,5,6,7,8,9.45,10,0,12.48,13,14,-1.54,16.21,-17,0,19,-2];
det(g)=-7.4473766747107554e+24+i4.3514436660822637e+23

f=g^-1;

Code: [Select]

f=[-0.0194101390259696-i0.00113411916989698,-0.1370614197121183-i0.0080083910445378,
0.0066192461046662+i0.000386757348184,-0.0465182165804565-i0.0027180228386169,
-0.386511062558009-i0.0225835376468868,-0.368461737789722-i0.0215289297846751,
-0.1614524182309398-i0.009433537920411,-0.2385493532116904-i0.01393825124497746,
0.4595938754918398+i0.0268537089747356, 0.0388561956287034+i0.0022703369755786,
0.1837886974705918+i0.01073862916349639, 0.5117449650708355+i0.0299008561560835,
0.1620417483438316+i0.0094679720157843, 0.1277470356882338+i0.0074641589056987,
-0.1869878416007705-i0.01092555264098641, 0.1301116930261207+i0.0076023239756936,
0.1197250236072046+i0.0069954390438745, 0.0993442813080926+i0.005804608287473,
-0.0020717516763048-i0.00012105082236762,-0.2827179734166223-i0.0165189890137946;
0.0337604928916169+i0.0019725990690909, 0.0299769462062127+i0.01392917529187581,
-0.01306560097164575-i0.0006726957847483,-0.0192320231024803+i0.0047275184685492,
0.12136210891085013+i0.0392800567360801, 0.0866611744166858+i0.0374457534790036,
0.0386556888522107+i0.0164079654184201, 0.055693308951244+i0.0242431149745011,
-0.11648218123635306-i0.0467072621036945, 0.0604679439001707-i0.0039488483427679,
-0.0280615129773847-i0.01867794007322,-0.11348444865514418-i0.0520072339698397,
-0.1499236106659666-i0.0164678574176749,-0.0331475772238254-i0.01298258004956008,
0.0202305291773326+i0.0190030602964516,-0.0270031861935396-i0.01322289367416595,
-0.0440565862158477-i0.01216732501495661, 0.0358409776223077-i0.0100960862034869,
0.0154972153526858+i0.0002105464274417, 0.0667522074753097+i0.0287318504226455;
0.0406117941812262+i0.0023729152193714, 0.0818252740755585+i0.0167559402015824,
-0.01085170799121976-i0.0008092116085059,-0.01108316472790187+i0.0056869136256106,
0.1517248804988679+i0.0472514896246874, 0.0585950532450137+i0.0450449357517479,
0.0715022541055779+i0.0197377720948801,-0.0520828615153939+i0.0291629745696253,
-0.10913404205833358-i0.0561859603594483, 0.0430512462722827-i0.0047502214101024,
-0.0543945245926987-i0.0224684118332657,-0.12046089994367322-i0.0625615001741418,
-0.0724493563580234-i0.0198098184821957,-0.0432071231790731-i0.01561724441069838,
0.0189264569889868+i0.0228595114428722,-0.10750152552027906-i0.0159063269040366,
0.0513258689097457-i0.01463654280255493, 0.0355983503043648-i0.0121449700467418,
0.043286961062462+i0.0002532743880342, 0.0170873264137525+i0.0345626469245062;
-0.0159470029981016-i0.000931770853282,-0.0579278258913802-i0.0065795425692905,
-0.0002637164077883+i0.0003177525201018, 0.01317218340486517-i0.0022330761412033,
-0.0542926443389835-i0.0185542072666661,-0.0126062849965109-i0.0176877613994824,
-0.017181424227656-i0.0077504162797713,-0.0209795548031127-i0.01145140352135348,
0.0591087304758857+i0.022062499241108,-0.0074086132114467+i0.00186526590602018,
0.0163702885251149+i0.0088226545537184, 0.1342346535807686+i0.0245659777155073,
0.0000232256387358+i0.0077787066810621, 0.01368776224649405+i0.0061324117404943,
0.0219876624186343-i0.0089762273463687, 0.0539338060356428+i0.0062459255480201,
-0.0231183686896271+i0.0057473203698566,-0.0451954066975247+i0.0047689563500441,
0.029589433178144-i0.0000994530654642,-0.0979559737147994-i0.01357168884654252;
0.0270098173828801+i0.00157816240411039, 0.2822294053188393+i0.01114392737497949,
0.0135642886383116-i0.0005381849832173, 0.0039312280452027+i0.0037822140488184,
0.4288829609106601+i0.0314257011186627, 0.3581887821357926+i0.0299581811935978,
0.1830606920666091+i0.01312706396197744, 0.2244567837334123+i0.0193955138734373,
-0.6048031004824733-i0.0373677784837187, 0.0180793287694184-i0.0031592451257527,
-0.1548464757746993-i0.0149431393696068,-0.7404162256078907-i0.0416079793806236,
-0.00007960509715-i0.01317498008594397,-0.1638551599103601-i0.01038661128032024,
0.128850098868514+i0.01520324925263357,-0.2125982673139815-i0.01057887230968555,
-0.0449222722876399-i0.0097343728880726,-0.11590363813509191-i0.0080772945322047,
-0.0367118167199483+i0.0001684460168895, 0.3807303570510562+i0.0229866914407692;
0.0405289318993353+i0.0023680736413576, 0.11148214611394603+i0.0167217522158427,
-0.00129221501739713-i0.0008075605334483, 0.0019705997187974+i0.0056753103303257,
0.1254488014001815+i0.0471550800389505,-0.0034092780624095+i0.0449530283086203,
-0.0303372563008461+i0.0196975001278765,-0.1648226353587958+i0.0291034718889808,
-0.0618045619113692-i0.0560713213246684, 0.0192129713643234-i0.0047405292949555,
0.0484247009571903-i0.0224225684049586,-0.0763036052803377-i0.0624338528055026,
0.0500677141133544-i0.0197693995153322,-0.037371848055371-i0.01558537976312966,
0.0000199038379996+i0.0228128700344031,-0.1589038574370042-i0.0158738724269483,
0.1411181108148658-i0.01460667912969671, 0.0204365488505158-i0.01212019005482421,
0.0610045485222371+i0.000252757619589,-0.0517062399548468+i0.0344921270213575;
-0.0352221441445672-i0.0020580022031672,-0.2033129989221616-i0.01453223510451822,
-0.0291679975757334+i0.0007018199637047, 0.0474400439994978-i0.0049321950802055,
-0.12018171605391551-i0.0409806759873619, 0.0370009471101926-i0.0390669570753481,
0.0516429278153983-i0.0171183437677289, 0.2467030664092351-i0.0252927139685577,
0.1295205241152076+i0.0487294401683013,-0.1591280629174403+i0.004119812645524,
-0.0710703227173497+i0.0194865963507867, 0.0969597598894756+i0.0542588728584819,
-0.11046223479751792+i0.0171808287746164, 0.0406517006168604+i0.01354465728157462,
0.12341720850775279-i0.0198257925646494, 0.199315428173636+i0.01379537521845265,
-0.2055876840688113+i0.01269410600450729,-0.0599417938584268+i0.01053319347844866,
-0.0711746548999218-i0.000219661977101, 0.0624404120414577-i0.0299757879831741;
0.0081821082410326+i0.0004780741546421, 0.102675244302531+i0.0033758399295984,
0.0198194052144595-i0.000163032860384, 0.0004582798404677+i0.00114574949913589,
0.1515148995684158+i0.0095198158676266, 0.060127170119415+i0.0090752587385449,
0.0237902158205569+i0.0039765932772258,-0.0535693260866477+i0.0058755004394625,
-0.1269786180193445-i0.01131985470122105, 0.0560906730305373-i0.0009570329636974,
-0.01004175635606827-i0.0045267386317264,-0.1324901331847655-i0.01260434256762883,
0.0351354779174615-i0.003991108551699,-0.0604964952618838-i0.0031464254847934,
-0.0164770597133613+i0.0046055339522322,-0.1517478501646902-i0.0032046672911151,
0.0337269698867066-i0.0029488423227647, 0.0181214240660289-i0.0024468620879714,
0.01020547141042502+i0.0000510275032009, 0.0289199897365273+i0.0069633790856655;
-0.0855434614452994-i0.0049982372282164,-0.0876699811315491-i0.0352942083331155,
0.0171838885388476+i0.00170449898678236,-0.0013575635030036-i0.01197874376848046,
-0.1443737898739694-i0.0995291161701729,-0.0379226738097229-i0.0948812974770497,
-0.039423574272766-i0.0415750493238491, 0.0343289525511508-i0.0614280122566028,
0.1519604273907546+i0.11834841652963564,-0.10261154979135434+i0.01000572346640078,
0.0232597906075389+i0.0473267867166671, 0.1381659923690335+i0.1317776617852742,
-0.0403896939358725+i0.0417268056665535, 0.0722280711352362+i0.0328956937772025,
0.012981757502854-i0.0481505871679929, 0.134654076778117+i0.0335046084440366,
-0.004615171744153+i0.0308299734145118, 0.0301539335505019+i0.0255817995213824,
-0.0361964298334951-i0.0005334895511192,-0.00177590366985481-i0.0728017196541579;
0.0218453568013083+i0.00127640703080258,-0.0360687764178845+i0.0090131327518192,
0.0045033886416937-i0.0004352803581316, 0.036121924954747+i0.0030590290272651,
-0.0600614082205919+i0.0254168935663961, 0.0039853559555188+i0.0242299734209682,
-0.0094350279881629+i0.01061708015044768, 0.020246079162043+i0.0156869598525506,
0.01463167809985502-i0.0302228053702613,-0.043572986696341-i0.0025551759945851,
0.0060957258463732-i0.01208590960217478, 0.0295053933264537-i0.0336522510488103,
0.009592203958364-i0.01065583438598161, 0.0340152894450295-i0.0084006206394755,
0.0214516524167138+i0.01229628470844514, 0.0087630613671468-i0.0085561200538527,
-0.0201178115133616-i0.0078730946589707,-0.024229047535509-i0.006532860942522,
0.0061163698112344+i0.00013623799408,-0.00122346407094997+i0.0185914798714436;
0.0023717548784452+i0.0001385797737122, 0.00127000820674749+i0.0009785576756027,
-0.0004651536338222-i0.0000472584779584,-0.0059787913672044+i0.0003321194103035,
-0.0199869109976612+i0.0027595173591952,-0.017417003321501+i0.002630653195023,
-0.01114788616837892+i0.00115269857437899,-0.0076362675002467+i0.00170313645579978,
0.01147052620860822-i0.0032812961916431, 0.0035884156375167-i0.0002774159829735,
0.01018550301142924-i0.00131216968988529, 0.0327141889714081-i0.0036536318139193,
0.0338533248498052-i0.00115690612969722, 0.0087544684830588-i0.0009120571096577,
-0.0443652618458861+i0.00133501015841773,0.01190391112150391-i0.0009289397130411,
-0.00116041352008804-i0.0008547835055162, 0.0030220362544637-i0.0007092740554232,
0.0051412022124669+i0.00001479138702232,-0.01187840518949871+i0.0020184807913035;
-0.0021773302246684-i0.0001272196939799,-0.0413996878030306-i0.0008983403904993,
-0.01022822662108148+i0.000043384463279, 0.0200731016564679-i0.0003048939149761,
-0.059829128139176-i0.002533305868274,-0.0427014479813116-i0.002415005346547,
-0.0194138840209737-i0.00105820608560225,-0.0080547729396944-i0.00156352181064276,
0.0855139254474379+i0.0030123118704566, 0.0021761912802275+i0.0002546748021998,
0.01537435822730602+i0.00120460455321332, 0.10034410912545845+i0.0033541252726216,
0.0061856561978348+i0.0010620687264888, 0.0240180114421728+i0.0008372912097827,
-0.0262380491838674-i0.00122557267387925, 0.0322499883210472+i0.0008527898614148,
-0.007793487012067+i0.0007847126104905,-0.0241592049734958+i0.0006511313004902,
0.0041348793570754-i0.00001357886277421,-0.0436616602045676-i0.00185301578791263;
0.00163093934628789+i0.0000952945043355, 0.0302530708970439+i0.000672906053765,
-0.0051672510640367-i0.0000324973342939,-0.0087897397246035+i0.0002283822071381,
0.0545519731256677+i0.0018975845601828, 0.0099335672909108+i0.00180897100336672,
0.0168173698306746+i0.0007926541972992, 0.0024116035820543+i0.0011711632947845,
-0.061889431957065-i0.0022563862372166, 0.0289729843517122-i0.000190765346804,
-0.01241661193219478-i0.0009023146513535,-0.063305462952149-i0.002512423158196,
0.0065498520652884-i0.0007955475264466,-0.0211767672346124-i0.0006271768805963,
-0.0078361711389552+i0.0009180209198029,-0.0330167947307559-i0.0006387862177904,
0.01203699951247948-i0.0005877926358975, 0.01237595588738707-i0.000487732933451,
0.00167711993385647+i0.00001017131040822, 0.0347682281317692+i0.00138801010685441;
0.0088216085486977+i0.0005154396550699, 0.0699799884812732+i0.0036396901024402,
0.01042231309956863-i0.000175775244291,-0.0163939124460478+i0.00123529942143221,
0.0648410525042197+i0.01026386923344891, 0.0245169509364199+i0.0097845662402882,
0.01212154464984239+i0.0042873973572173,-0.0250403304837035+i0.0063347200229777,
-0.0847635771635731-i0.01220459618237775, 0.0830344016548766-i0.00103183310770688,
-0.0086389649556449-i0.0048805411802176,-0.0709062996003324-i0.01358947753681597,
0.01233728467259267-i0.0043030471219977,-0.0577372300533136-i0.0033923449967696,
-0.0363107561220523+i0.0049654950151578,-0.0603695286263248-i0.0034551388881975,
0.0330834006796475-i0.0031793190553025, 0.01541772964384465-i0.0026381048596356,
0.01511361734985653+i0.0000550157300777, 0.01558068918132165+i0.0075076254994859;
-0.00010647519188074-i0.0000062212617884,-0.0398796154392724-i0.0000439303897814,
-0.0095374480770532+i0.0000021215748534, 0.0047233939370626-i0.00001490983670394,
-0.0490527259583104-i0.0001238830129491,-0.0215208315545052-i0.00011809791402026,
-0.008928255502146-i0.0000517480971592, 0.0081910407792857-i0.0000764589049983,
0.0527150573359137+i0.0001473072301011,-0.01482946131806337+i0.00001245403573798,
0.00175733652455657+i0.0000589072339559, 0.0764247908005089+i0.0001640224932112,
-0.01441465334412763+i0.0000519369869403, 0.0224513470089867+i0.000040944979871,
0.0095327141628947-i0.0000599326111109, 0.0505573225600725+i0.0000417028905856,
-0.01545491389652381+i0.0000383737959573, 0.0073030040545381+i0.0000318414402068,
-0.0245305385048686-i0.0000006640297383,-0.0296398692001017-i0.0000906156582684;
-0.0030059108442561-i0.0001756330084452,-0.0507753907650083-i0.00124020283696128,
-0.01035452831279432+i0.0000598943730102, 0.0052508409786246-i0.0004209209586084,
-0.0675825098326581-i0.003497352627079,-0.0272727074960238-i0.0033340329720668,
-0.0167509459726376-i0.00146090524631103,-0.0017056013050055-i0.0021585183141238,
0.0636853406801707+i0.0041586438359693,-0.01013932855255368+i0.0003515910177601,
0.01051793928311291+i0.0016630154895754, 0.0729531249765221+i0.0046305339519651,
0.0085855906382627+i0.00146623781093389, 0.0263497321300003+i0.00115592145774289,
-0.0055583658766593-i0.00169196300547323, 0.0670641158440147+i0.00117731810418832,
-0.0266263975370759+i0.00108333413038318,-0.0129276616179764+i0.0008989185999456,
-0.0047298475908088-i0.0000187462840515,-0.01524138264719996-i0.0025581789056883;
-0.0000014128898892-i0.0000000825540459,-0.0077705202097542-i0.0000005829414575,
-0.0027687903174659+i0.0000000281525828, 0.0069182874879205-i0.0000001978485049,
0.0276527070967543-i0.00000164388580427, 0.0287600300905307-i0.00000156711949242,
0.01477139232511271-i0.000000686679798, 0.0239238381078118-i0.00000101458388478,
-0.0178177051142643+i0.0000019547172664, 0.0012810880714072+i0.0000001652608543,
-0.01367992113534759+i0.000000781679129,-0.0445041351219465+i0.0000021765231709,
-0.0081580467652459+i0.0000006891863017,-0.01101528465677902+i0.0000005433260748,
0.00139192678644616-i0.0000007952855381,-0.0055612534868285+i0.0000005533832944,
-0.0098689712537824+i0.0000005092073314,-0.0022620865749333+i0.0000004225251735,
-0.0072389765816235-i0.0000000088114506, 0.0226401372793714-i0.00000120243922654;
0.0234133161595634+i0.00136802166393001, 0.0470593492766544+i0.0096600540163217,
0.01515590328711374-i0.0004665227826525,-0.01095847810732329+i0.0032785920783106,
-0.0001388320378292+i0.0272412014267657,-0.0694657873375164+i0.0259690896057587,
-0.032625955539782+i0.01137912539102907,-0.092955386465975+i0.0168128977681953,
0.01398618141222478-i0.0323920595025713, 0.0372086071131991-i0.002738574789539,
0.037354674136369-i0.0129533806733097, 0.0286026430819526-i0.0360676550377794,
0.042654833742052-i0.01142066122756087, 0.01042256212525127-i0.009003578598305,
-0.0324649112247081+i0.01317885553828946,-0.0364495167960244-i0.0091702390463147,
0.0582902229292784-i0.0084381892262622, 0.0174612148754783-i0.0070017596903966,
0.0355941815503645+i0.0001460165314465,-0.0631054325565208+i0.0199258908912945;
0.0040047719980562+i0.0002339956807102,-0.0473624348634574+i0.00165232099377236,
-0.001969428243213-i0.0000797972129915,-0.0217534039207987+i0.0005607925702957,
-0.0616025485119036+i0.0046595193916074,-0.0624283196648258+i0.004441928779306,
-0.0317901688766614+i0.00194636259203078,-0.0414601687778709+i0.0028757917814537,
0.0983774509889199-i0.005540557004877, 0.0068442021826542-i0.0004684243597526,
0.0275640390312306-i0.0022156338660914, 0.11566639645662481-i0.006169255732356,
0.0081571421819226-i0.0019534671625207, 0.0276218679963847-i0.001540032996909,
-0.0222478497039098+i0.0022542006124413, 0.0358145601712081-i0.00156853972747311,
0.0096475510590416-i0.00144332497358908, 0.0173213828634444-i0.00119762834765146,
0.0049905203726582+i0.0000249756554093,-0.0532297427699772+i0.003408259186095;
-0.0069944360220029-i0.0004086794002123, 0.008030569558455-i0.0028858205871301,
-0.01078112655241977+i0.0001393678594621,-0.0008282345333327-i0.0009794384690193,
0.0206669562294324-i0.0081379689764357, 0.0392599799234215-i0.0077579414449135,
0.0252112335649803-i0.0033993717075995, 0.0523217271062519-i0.0050226433958645,
-0.0298505153673624+i0.009676723547728,-0.0066479178887888+i0.0008181150430105,
-0.0240859175265769+i0.0038696608276528,-0.0490925571630928+i0.01077476184518943,
-0.0215200176500464+i0.0034117800204272,-0.01118715686671396+i0.0026897067483196,
0.023572457544089-i0.0039370186298079,-0.01242750526869648+i0.0027394944773648,
-0.0241403756810982+i0.0025208037290581,...];

det(f)=-1.3381861640951734e-25-i7.8189165959126229e-27

[RuiLoureiro]

Hi
        --**** The calculator v2014.01 ****--
                            (calcula63)
   
        This is the latest powerful version.

        In this new version, we may define up to
        30 constants or matrices and matrices
        20x21. Each matrix may be real or complex.

        We may compute the determinant of any
        defined matrix N by (N+1) - the same
        as N by N.

        We may do linear transformations also:
        add lines, sub lines, etc.

        See the examples in the files:
       
            .  Examples_real_matrix.txt
            .  Examples_complex_matrix.txt
            .  Examples_equations.txt

        Finally, we may transfer all work done
        to the file TheCalculator.txt. To do
        this, press ToFile.
        To start a new page, press Del File.
       

        To transfer to the file ThisWork.txt
        use
                file(ThisWork)
       
        Last note: now the calculator has a
        unique table of erros with 190 messages.

           
    Jan. 2014

    Good luck !   
    RuiLoureiro