From ea958d3c401761dcc24865d9639b2fab31038db8 Mon Sep 17 00:00:00 2001
From: Brijeshcr
Date: Thu, 6 Jul 2017 15:48:47 +0530
Subject: Revert "LinearAlgebra Function Added"

---
 src/c/matrixOperations/norm/dnorma.c | 12 ++----------
 1 file changed, 2 insertions(+), 10 deletions(-)

(limited to 'src/c/matrixOperations/norm')

diff --git a/src/c/matrixOperations/norm/dnorma.c b/src/c/matrixOperations/norm/dnorma.c
index 2bb9b8b..c912f85 100644
--- a/src/c/matrixOperations/norm/dnorma.c
+++ b/src/c/matrixOperations/norm/dnorma.c
@@ -6,8 +6,6 @@
  are also available at
  http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
  Author: Siddhesh Wani
-
- Edited by: Sandeep Gupta
  Organization: FOSSEE, IIT Bombay
  Email: toolbox@scilab.in
  */
@@ -16,17 +14,13 @@
  /*Acceptable norms are: 1, 2, 'inf', 'fro', */
 
 #include "norm.h"
-#include "svd.h"
 #include <math.h>
-#include <stdio.h>
-#include<stdlib.h>
 
 double dnorma (double *in, int row, int col, int norm)
 {
 	double res = 0, sum = 0;
 	int col_count, row_count;
-	double *S;
-	S = (double *)malloc(min(row,col)*sizeof(double));
+
 	switch (norm)
 	{
 		case 1:  /*largest column sum*/
@@ -43,8 +37,6 @@ double dnorma (double *in, int row, int col, int norm)
 			break;
 
 		case 2:  /*Largest singular value of the matrix*/
-			dsvda(0,in,row,col,0,1,S,NULL,NULL);			
-			res = S[0];
 			break;
 
 		case 3: /*inf: largest row sum*/
@@ -77,4 +69,4 @@ double dnorma (double *in, int row, int col, int norm)
 
 
 	return res;
-}
+}
\ No newline at end of file
-- 
cgit