=================================================================== RCS file: /home/cvs/OpenXM/src/ox_gsl/ox_gsl.h,v retrieving revision 1.5 retrieving revision 1.8 diff -u -p -r1.5 -r1.8 --- OpenXM/src/ox_gsl/ox_gsl.h 2018/04/06 01:56:49 1.5 +++ OpenXM/src/ox_gsl/ox_gsl.h 2018/06/08 00:03:43 1.8 @@ -1,4 +1,4 @@ -/* $OpenXM: OpenXM/src/ox_gsl/ox_gsl.h,v 1.4 2018/04/04 01:03:59 takayama Exp $ +/* $OpenXM: OpenXM/src/ox_gsl/ox_gsl.h,v 1.7 2018/06/07 11:49:51 takayama Exp $ */ // Todo, misc-2017/A3/kanazawa/ox_gsl.h.for_obj #include @@ -19,6 +19,9 @@ int main(); double get_double(); double *get_double_list(int *length); +// They will be replaced by the following functions. +double cmo2double(cmo *c); +double *cmo2double_list(int *length,cmo *c); void init_gc(); void *gc_realloc(void *p,size_t osize,size_t nsize); @@ -49,4 +52,7 @@ void test_ox_eval(); int eval_cmo(cmo *c,double *retval); int register_entry(char *s,double v); void init_dic(); + +cmo *element_of_at(cmo *list,int k); +int get_length(cmo *c);