You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
31 lines
452 B
31 lines
452 B
8 years ago
|
Disp "CALC UNILAT."
|
||
|
Disp "GAIN"
|
||
|
Disp "4 ALL CASES"
|
||
|
Disp "GAMMAS"
|
||
|
Prompt A
|
||
|
Disp "GAMMAL"
|
||
|
Prompt B
|
||
|
[list]S(1)+([list]S(2)*[list]S(3)*B)/(1-[list]S(4)*B)->C
|
||
|
(1-abs(A)^2)/abs(1-C*A)^2->G
|
||
|
Disp "GS",G
|
||
|
G->X
|
||
|
10*log(G)->G
|
||
|
Disp "GS IN DB",G
|
||
|
Pause
|
||
|
(1-abs(B)^2)/abs(1-[list]S(4)*B)^2->G
|
||
|
Disp "GL",G
|
||
|
X*G->X
|
||
|
10*log(G)->G
|
||
|
Disp "GL IN DB",G
|
||
|
Pause
|
||
|
abs([list]S(3))^2->G
|
||
|
Disp "G0",G
|
||
|
X*G->X
|
||
|
10*log(G)->G
|
||
|
Disp "G0 IN DB",G
|
||
|
Pause
|
||
|
Disp "GT",X
|
||
|
10*log(X)->X
|
||
|
Disp "GT IN DB",X
|
||
|
|