From 3415acb6050605a91c58b7d78a44ffc5e1d9131f Mon Sep 17 00:00:00 2001 From: imushir Date: Wed, 2 Mar 2016 12:12:02 +0530 Subject: added support of double datatype for logspace --- src/c/elementaryFunctions/logspace/dlogspacea.c | 40 +++++++++++++++++++++++++ 1 file changed, 40 insertions(+) create mode 100644 src/c/elementaryFunctions/logspace/dlogspacea.c (limited to 'src/c/elementaryFunctions/logspace/dlogspacea.c') diff --git a/src/c/elementaryFunctions/logspace/dlogspacea.c b/src/c/elementaryFunctions/logspace/dlogspacea.c new file mode 100644 index 00000000..f8b283c6 --- /dev/null +++ b/src/c/elementaryFunctions/logspace/dlogspacea.c @@ -0,0 +1,40 @@ +/* + Scilab2C FOSSEE IIT Bombay + */ + +#include "logspace.h" +#include +void dlogspacea(double *low_limit,int _row,double *up_limit,double range_num,double *out) +{ + int i,j,k; + double temp; + double step_iterate[_row]; // for each row the spacing between two values is different. + for(i=0;i<_row;i++) + { + step_iterate[i] = pow(10,((up_limit[i]-low_limit[i])/(range_num-1))); + + + } + for(j=0;j < _row;j++) + { + out[j] = pow(10,low_limit[j]); // For every row first element is equal to 10 raise to the first value of low_limit array + temp = out[j]; + for(k=1;k < (double)range_num;k++ ) + { + out[(_row*k)+j] = temp*step_iterate[j]; /* Output matrix positions for 3 X 5 matrix are [0 3 6 9 12;1 4 7 10 13;2 5 8 11 14] so (_row*k)+j) used*/ + temp = out[(_row*k)+j]; + if(k == (double)range_num-1 ) + { + out[(_row*k)+j] = pow(10,((double)up_limit[j])); // For every row Last value of output is equal to 10 raise to first value of up_limit array + } + + } + + + } + + + + +} + -- cgit From c8fd6991786ccddb44547b619178bb391f3f9b96 Mon Sep 17 00:00:00 2001 From: siddhu8990 Date: Thu, 18 Aug 2016 15:47:18 +0530 Subject: RPi-PWM and basic imaage processing --- src/c/elementaryFunctions/logspace/dlogspacea.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/c/elementaryFunctions/logspace/dlogspacea.c') diff --git a/src/c/elementaryFunctions/logspace/dlogspacea.c b/src/c/elementaryFunctions/logspace/dlogspacea.c index f8b283c6..9ea551bd 100644 --- a/src/c/elementaryFunctions/logspace/dlogspacea.c +++ b/src/c/elementaryFunctions/logspace/dlogspacea.c @@ -8,7 +8,7 @@ void dlogspacea(double *low_limit,int _row,double *up_limit,double range_num,dou { int i,j,k; double temp; - double step_iterate[_row]; // for each row the spacing between two values is different. + double step_iterate[_row]; /* for each row the spacing between two values is different.*/ for(i=0;i<_row;i++) { step_iterate[i] = pow(10,((up_limit[i]-low_limit[i])/(range_num-1))); @@ -17,7 +17,7 @@ void dlogspacea(double *low_limit,int _row,double *up_limit,double range_num,dou } for(j=0;j < _row;j++) { - out[j] = pow(10,low_limit[j]); // For every row first element is equal to 10 raise to the first value of low_limit array + out[j] = pow(10,low_limit[j]); /* For every row first element is equal to 10 raise to the first value of low_limit array*/ temp = out[j]; for(k=1;k < (double)range_num;k++ ) { @@ -25,7 +25,7 @@ void dlogspacea(double *low_limit,int _row,double *up_limit,double range_num,dou temp = out[(_row*k)+j]; if(k == (double)range_num-1 ) { - out[(_row*k)+j] = pow(10,((double)up_limit[j])); // For every row Last value of output is equal to 10 raise to first value of up_limit array + out[(_row*k)+j] = pow(10,((double)up_limit[j])); /* For every row Last value of output is equal to 10 raise to first value of up_limit array*/ } } -- cgit From 453598b49cb3d4a62b1797dbc90f0e3dd4521329 Mon Sep 17 00:00:00 2001 From: siddhu8990 Date: Wed, 19 Apr 2017 11:56:09 +0530 Subject: Copyright message updated in added files and libraries separated in 'thirdparty' folder --- src/c/elementaryFunctions/logspace/dlogspacea.c | 14 +++++++++++--- 1 file changed, 11 insertions(+), 3 deletions(-) (limited to 'src/c/elementaryFunctions/logspace/dlogspacea.c') diff --git a/src/c/elementaryFunctions/logspace/dlogspacea.c b/src/c/elementaryFunctions/logspace/dlogspacea.c index 9ea551bd..3a9caf15 100644 --- a/src/c/elementaryFunctions/logspace/dlogspacea.c +++ b/src/c/elementaryFunctions/logspace/dlogspacea.c @@ -1,6 +1,14 @@ -/* - Scilab2C FOSSEE IIT Bombay - */ +/* Copyright (C) 2016 - IIT Bombay - FOSSEE + + This file must be used under the terms of the CeCILL. + This source file is licensed as described in the file COPYING, which + you should have received as part of this distribution. The terms + are also available at + http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt + Author: Mushir + Organization: FOSSEE, IIT Bombay + Email: toolbox@scilab.in +*/ #include "logspace.h" #include -- cgit From e36eac94dd517bb69d3e5782516ee58942451991 Mon Sep 17 00:00:00 2001 From: Siddhesh Wani Date: Thu, 4 May 2017 16:15:18 +0530 Subject: Basic functions and image processing working with MSVC on windows x64 --- src/c/elementaryFunctions/logspace/dlogspacea.c | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'src/c/elementaryFunctions/logspace/dlogspacea.c') diff --git a/src/c/elementaryFunctions/logspace/dlogspacea.c b/src/c/elementaryFunctions/logspace/dlogspacea.c index 3a9caf15..62802f77 100644 --- a/src/c/elementaryFunctions/logspace/dlogspacea.c +++ b/src/c/elementaryFunctions/logspace/dlogspacea.c @@ -9,14 +9,16 @@ Organization: FOSSEE, IIT Bombay Email: toolbox@scilab.in */ - +#include +#include #include "logspace.h" -#include + void dlogspacea(double *low_limit,int _row,double *up_limit,double range_num,double *out) { int i,j,k; double temp; - double step_iterate[_row]; /* for each row the spacing between two values is different.*/ + double *step_iterate; /* for each row the spacing between two values is different.*/ + step_iterate = (double*) malloc((double)_row*sizeof(double)); for(i=0;i<_row;i++) { step_iterate[i] = pow(10,((up_limit[i]-low_limit[i])/(range_num-1))); -- cgit