Few questions and again if statement
12-25-2021, 01:36 PM
Post: #1
 Amer7 Junior Member Posts: 41 Joined: Dec 2020
Few questions and again if statement
Hi, it has passed a few months since my last post.

I'm wondering is there a Chi table, Z table and T tables in the calculator from witch I can pull values ?
If there isn't is there a way to insert them and pull values.

2. Question I'm having a bit trouble again with the if statement.

The code is.
Code:
 EXPORT A1,A2,A3; EXPORT TST() BEGIN A3:=(A2)^(-1)*A1*(A2)^(-1); local a1,a2,b1,b2,r1,r2; a1:=SQRT((A1(1,1))); a2:=SQRT((A1(2,2))); b1:=SQRT((A1(3,3))); b2:=SQRT((A1(4,4))); r1:=SQRT((A1(1,1)-A1(2,2))^2+4*(A1(1,2))^2); r2:=SQRT((A1(3,3)-A1(4,4))^2+4*(A1(3,4))^2); local l1,l2,l3,l4; l1:=0.5*(A1(1,1)+A1(2,2)+r1); l2:=0.5*(A1(1,1)+A1(2,2)-r1); l3:=0.5*(A1(3,3)+A1(4,4)+r2); l4:=0.5*(A1(3,3)+A1(4,4)-r2); local q1,q2,p1,p2,q3,q4; q1:=atan((l1-A1(1,1))/A1(1,2)); q2:=atan((l3-A1(3,3))/A1(3,4)); p1:=A1(1,2)/(SQRT(A1(1,1)*A1(2,2))); p2:=A1(3,4)/(SQRT(A1(3,3)*A1(4,4))); local t1,t2,t3,t4; local t1:=SQRT(l1); local t2:=SQRT(l2); local t3:=SQRT(l3); local t4:=SQRT(l4); local q3,q4; IF(q1<0) THEN q3:=p1+180; END; PRINT ("Rezultati su ispod"); PRINT("SxA ="+a1); PRINT("SyA ="+a2); PRINT("A λ1="+l1); PRINT("A λ2="+l2); PRINT("a (A)="+t1); PRINT("b (A)="+t2); PRINT("R (A)="+r1); PRINT({"A θ="+→HMS(q3)}); PRINT("----------B----------"); PRINT("SxA ="+b1); PRINT("SyA ="+b2); PRINT("A λ1="+l3); PRINT("A λ2="+l4); PRINT("a (B)="+t3); PRINT("b (B)="+t4); PRINT("R (B)="+r2); PRINT({"B θ="+→HMS(q4)}); END;

The issue is my q1 and q2 variables can be negative and that is a no go. If it's negative i have to add +180.
When I write

Code:
 IF(q1<0) THEN q3:=p1+180; END;

It correctly fixes the value of p1 if its negative. But I want to do that also if the q2 ends up being negative so I write:

Code:
IF(q1<0) THEN q3:=p1+180; END; IF(q2<0) THEN  q4:=p2+180; END;
In this case the result for q1(q3) is correct, but q2(q4) ends up being 0. And that is not correct.

What I want it to do is to:
Test if q1 is negative, it it is fix it by adding +180
Test if q2 is negative, if it is fix it by adding +180
If the q1 or q2 are positive don't touch their values, just print them. ( q1 and q2 are independent of each other)

Also I have forgot how or why. When I input the values into M1, M2 matrix ( default matrices that are in calculator).
Then I pull values like ( M1(1,1), M1(2,4) ) from matrices(M1,M2) to local variables a1,a2,b1,b2...
But it doesn't let me. ->I have to first store M1->A1, M2->A2
It doesn't let me for some reason. If i write in program M instead A ( matrix) to run the program i get an error.

My goal is to Input values to default matrix of calculator (M0-M9)
- Pull values from Matrix ( M0-M9) to local variable
Compute
A3:=(A2)^(-1)*A1*(A2)^(-1);
In prefered case
M3:=(M2)^(-1)*M1*(M2)^(-1);
So the product of operation from matrices M1, M2 is stored into default Matrix M3 for easy viewing.
 « Next Oldest | Next Newest »

 Messages In This Thread Few questions and again if statement - Amer7 - 12-25-2021 01:36 PM RE: Few questions and again if statement - roadrunner - 12-25-2021, 07:33 PM RE: Few questions and again if statement - Amer7 - 12-28-2021, 11:27 AM RE: Few questions and again if statement - Wes Loewer - 12-28-2021, 08:06 PM RE: Few questions and again if statement - Amer7 - 12-28-2021, 09:03 PM

User(s) browsing this thread: 1 Guest(s)