From f35ea80659b6a49d1bb2ce1d7d002583f3f40947 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:38:01 +0530
Subject: updated the code

---
 37/CH8/EX8.5/s5.sci | 58 ++++++++++++++++++++++++++---------------------------
 1 file changed, 29 insertions(+), 29 deletions(-)

(limited to '37/CH8')

diff --git a/37/CH8/EX8.5/s5.sci b/37/CH8/EX8.5/s5.sci
index 04714a975..668d8e6a0 100755
--- a/37/CH8/EX8.5/s5.sci
+++ b/37/CH8/EX8.5/s5.sci
@@ -1,29 +1,29 @@
-//Warshall's Algorithm
-funcprot(0)
-function[path]=transclose(adj,n)
-  for  i=1:n
-    for j=1:n
-      path((i-1)*n+j)=adj((i-1)*n+j);
-    end
-  end
-  for k=1:n
-    for  i=1:n
-      if(path((i-1)*n+k)==1)
-        for j=1:n
-          path((i-1)*n+j)=path((i-1)*n+j)|path((k-1)*n+j);
-        end
-      end
-    end
-  end
-  printf("Transitive closure for the given graph is:\n");
-  for  i=1:n
-    printf("For vertex %d \n",i);
-    for j=1:n
-       printf("%d %d is %d\n",i,j,path((i-1)*n+j));
-    end
-  end
-endfunction
-//Calling Routine:
-n=3;
-adj=[0 1 0 0 0 1 0 0 0]
-path=Tranclose(adj,n)
\ No newline at end of file
+//Warshall's Algorithm
+funcprot(0)
+function[path]=transclose(adj,n)
+  for  i=1:n
+    for j=1:n
+      path((i-1)*n+j)=adj((i-1)*n+j);
+    end
+  end
+  for k=1:n
+    for  i=1:n
+      if(path((i-1)*n+k)==1)
+        for j=1:n
+          path((i-1)*n+j)=path((i-1)*n+j)|path((k-1)*n+j);
+        end
+      end
+    end
+  end
+  printf("Transitive closure for the given graph is:\n");
+  for  i=1:n
+    printf("For vertex %d \n",i);
+    for j=1:n
+       printf("%d %d is %d\n",i,j,path((i-1)*n+j));
+    end
+  end
+endfunction
+//Calling Routine:
+n=3;
+adj=[0 1 0 0 0 1 0 0 0]
+path=transclose(adj,n)
\ No newline at end of file
-- 
cgit