summaryrefslogtreecommitdiff
path: root/sci_gateway/cpp/sci_sym_solve.cpp~
diff options
context:
space:
mode:
Diffstat (limited to 'sci_gateway/cpp/sci_sym_solve.cpp~')
-rw-r--r--sci_gateway/cpp/sci_sym_solve.cpp~49
1 files changed, 0 insertions, 49 deletions
diff --git a/sci_gateway/cpp/sci_sym_solve.cpp~ b/sci_gateway/cpp/sci_sym_solve.cpp~
deleted file mode 100644
index 4abb268..0000000
--- a/sci_gateway/cpp/sci_sym_solve.cpp~
+++ /dev/null
@@ -1,49 +0,0 @@
-/*
- * Implementation Symphony Tool Box for Scilab
- * Contains sym_solve function
- * Author : Sai Kiran
- */
-
-#include <symphony.h>
-#include <sci_iofunc.hpp>
-extern sym_environment* global_sym_env;//defined in globals.cpp
-
-extern "C" {
-#include <api_scilab.h>
-#include <Scierror.h>
-#include <BOOL.h>
-#include <localization.h>
-#include <sciprint.h>
-#include <stdio.h>
-int process_ret_val(int);
-
-int sci_sym_solve(char *fname, unsigned long fname_len){
-
- int status=0;
-
- //check whether we have no input and one output argument or not
- CheckInputArgument(pvApiCtx, 0, 0) ;//no input argument
- CheckOutputArgument(pvApiCtx, 1, 1) ;//one output argument
-
- // Check environment
- if(global_sym_env==NULL)
- sciprint("Error: Symphony environment is not initialized.\n");
- else {// There is an environment opened
- double time_limit = -1.0;
- status = sym_get_dbl_param(global_sym_env,"time_limit",&time_limit);
-
- if (status == FUNCTION_TERMINATED_NORMALLY) {
- if ( time_limit < 0.0 )
- sciprint("\nNote: There is no limit on time.\n");
- else sciprint("\nNote: Time limit has been set to %lf.\n",time_limit);
- status=process_ret_val(sym_solve(global_sym_env));// Call function
- }
- else {
- sciprint("\nUnable to read time limit.\n");
- status = 1; //Error state
- }
- }
- // Return result to scilab
- return returnDoubleToScilab(status);
- }
-}