gs_oct.h

Go to the documentation of this file.
00001 #include <oct.h>
00002 
00003 #ifndef _GS_OCTAVE_H_
00004 #define _GS_OCTAVE_H_
00005 
00006 double *oct_GetPr(octave_value arg);
00007 double *oct_GetPi(octave_value arg);
00008 double *oct_GetSparsePr(octave_value arg);
00009 double *oct_GetSparsePi(octave_value arg);
00010 int *oct_GetSparseIr(octave_value arg);
00011 int *oct_GetSparseJc(octave_value arg);
00012 
00013 int convert_octave_arguments(gs_problem_t* pd, octave_value_list oct_args);
00014 int convert_matrix(gs_argument_t *argp, octave_value_list octval, int i);
00015 int convert_sparse_matrix(gs_problem_t *pd, gs_argument_t *argp, octave_value_list octval, int i);
00016 int convert_vector(gs_argument_t *argp, octave_value_list octval, int i);
00017 int convert_scalar(gs_argument_t *argp, octave_value_list octval, int i);
00018 int convert_file_argument(gs_argument_t *argp, octave_value_list octval, int index);
00019 int convert_packed_file_argument(gs_argument_t *argp, octave_value_list octval, int index);
00020 int process_gs_out_arguments(gs_problem_t* pd);
00021 
00022 int convert_output_objects(gs_problem_t* pd, octave_value_list& retvals);
00023 int fill_matrix(gs_argument_t *argp, octave_value_list& retval);
00024 int fill_sparse_matrix(gs_problem_t *pd, gs_argument_t *argp, octave_value_list& retval);
00025 int fill_vector(gs_argument_t *argp, octave_value_list& retval);
00026 int fill_scalar(gs_argument_t *argp, octave_value_list& retval);
00027 int fill_file_argument(gs_argument_t *argp, octave_value_list& retval);
00028 int fill_packed_file_argument(gs_argument_t *argp, octave_value_list& retval);
00029 
00030 int verify_allocation(void *ptr);
00031 
00032 int sparsematrix_octcsc_to_gscsr(
00033     int m, int n, int nnz, int datatype,
00034     double *a, double *ai, int *colind, int *rowptr,
00035     void *at, int *rowind, int *colptr);
00036 
00037 #endif