1 files changed, 13 insertions, 0 deletions
diff --git a/149/CH2/EX2.54/ex54.sce b/149/CH2/EX2.54/ex54.sce
new file mode 100755
index 000000000..25b22114e
--- /dev/null
+++ b/149/CH2/EX2.54/ex54.sce
@@ -0,0 +1,13 @@
+clear
+clc
+A=[0 1+2*%i;-1+2*%i 0]
+I=eye(2,2)
+disp("I-A= ")
+I-A
+disp("inverse of (I+A)= ")
+inv(I+A)
+disp("((I-A)(inverse(I+A)))*((I-A)(inverse(I+A)))=")
+(((I-A)*(inv(I+A)))')*((I-A)*(inv(I+A)))
+disp("((I-A)(inverse(I+A)))((I-A)(inverse(I+A)))*=")
+((I-A)*(inv(I+A)))*(((I-A)*(inv(I+A)))')
+disp("clearly,the product is an identity matrix.hence,it is a unitary matrix")