From 765d9c44f94634406eeff50e20e8cdfcf1b7699c Mon Sep 17 00:00:00 2001
From: siddhu8990
Date: Thu, 2 Feb 2017 16:02:41 +0530
Subject: Support for function 'schur' added

q
---
 macros/ASTManagement/AST_HandleEndGenFun.bin | Bin 96888 -> 97736 bytes
 macros/ASTManagement/AST_HandleEndGenFun.sci |  12 +++++++++---
 2 files changed, 9 insertions(+), 3 deletions(-)

(limited to 'macros/ASTManagement')

diff --git a/macros/ASTManagement/AST_HandleEndGenFun.bin b/macros/ASTManagement/AST_HandleEndGenFun.bin
index f16974e2..a9e28eff 100644
Binary files a/macros/ASTManagement/AST_HandleEndGenFun.bin and b/macros/ASTManagement/AST_HandleEndGenFun.bin differ
diff --git a/macros/ASTManagement/AST_HandleEndGenFun.sci b/macros/ASTManagement/AST_HandleEndGenFun.sci
index 5086680b..fa7b33a2 100644
--- a/macros/ASTManagement/AST_HandleEndGenFun.sci
+++ b/macros/ASTManagement/AST_HandleEndGenFun.sci
@@ -199,9 +199,9 @@ NOutArg_mod = NOutArg
 			// is a name of a function
 			if NInArg == 4 
 				ODEFunName = InArg(4).Name;
-				InArg(4).Name = 'odefn'+ InArg(4).Name
 				//To differentiate functions containing differential equations,
 				//'odefn' is added at the beginning of the function name.  
+				InArg(4).Name = 'odefn'+ InArg(4).Name
 				SharedInfo.Includelist($+1) = InArg(4).Name; 
 				//Add ode function in list. this will be used to add corresponding
 				//header file in main function.
@@ -209,7 +209,13 @@ NOutArg_mod = NOutArg
 				ODEFunName = InArg(5).Name;
 				InArg(5).Name = 'odefn'+ InArg(5).Name
 				SharedInfo.Includelist($+1) = InArg(5).Name; 
-			end	
+			elseif NInArg == 6 
+				ODEFunName = InArg(6).Name;
+				InArg(6).Name = 'odefn'+ InArg(6).Name
+				SharedInfo.Includelist($+1) = InArg(6).Name; 
+			end
+			
+			
 		elseif(ASTFunName == 'RPI_ThreadCreate')
 			PI_thread_FunName = InArg(1).Name;
 			InArg(1).Name = 'PI_thread_'+PI_thread_FunName;
@@ -390,7 +396,7 @@ NOutArg_mod = NOutArg
 	   ST_InsOutArg(OutArg,NOutArg,FileInfo,SharedInfo,'all');
 	end
 	if ASTFunName == 'ode' then
-		if NInArg == 4
+		if ((NInArg == 4) | (NInArg == 6))
 			ODE_InArg(1) = InArg(3)
 			ODE_InArg(2) = InArg(1)
 			ODE_OutArg(1) = OutArg(1)
-- 
cgit