Skip to content

Commit

Permalink
Added range_alloc_real_array and range_real_array.
Browse files Browse the repository at this point in the history
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@702 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
ankar committed Jan 29, 2002
1 parent 995e7a1 commit 6fe1c19
Showing 1 changed file with 13 additions and 0 deletions.
13 changes: 13 additions & 0 deletions c_runtime/real_array.h
Expand Up @@ -74,8 +74,13 @@ void simple_index_real_array2(real_array_t* source,
int, int,
real_array_t* dest);

real* real_array_element_addr(real_array_t* source,int ndims,...);

void modelica_builtin_cat_real_array(int k, real_array_t* A, real_array_t* B);

void range_alloc_real_array(real start,real stop,real inc,real_array_t* dest);
void range_real_array(real start,real stop, real inc,real_array_t* dest);

void add_alloc_real_array(real_array_t* a, real_array_t* b,real_array_t* dest);
void add_real_array(real_array_t* a, real_array_t* b, real_array_t* dest);

Expand All @@ -84,15 +89,23 @@ void sub_alloc_real_array(real_array_t* a, real_array_t* b, real_array_t* dest);


void mul_scalar_real_array(modelica_real a,real_array_t* b,real_array_t* dest);
void mul_alloc_scalar_real_array(modelica_real a,real_array_t* b,real_array_t* dest);

void mul_real_array_scalar(real_array_t* a,modelica_real b,real_array_t* dest);
void mul_alloc_real_array_scalar(real_array_t* a,modelica_real b,real_array_t* dest);

double mul_real_scalar_product(real_array_t* a, real_array_t* b);

void mul_real_matrix_product(real_array_t*a,real_array_t*b,real_array_t*dest);
void mul_real_matrix_vector(real_array_t* a, real_array_t* b,real_array_t* dest);
void mul_real_vector_matrix(real_array_t* a, real_array_t* b,real_array_t* dest);
void mul_alloc_real_matrix_product_smart(real_array_t* a, real_array_t* b, real_array_t* dest);

void div_real_array_scalar(real_array_t* a,modelica_real b,real_array_t* dest);
void div_alloc_real_array_scalar(real_array_t* a,modelica_real b,real_array_t* dest);

void exp_real_array(real_array_t* a, modelica_integer b, real_array_t* dest);
void exp_alloc_real_array(real_array_t* a, modelica_integer b, real_array_t* dest);

void promote_real_array(real_array_t* a, int n,real_array_t* dest);
void promote_real_scalar(double s,int n,real_array_t* dest);
Expand Down

0 comments on commit 6fe1c19

Please sign in to comment.