diff options
| author | torset | 2009-01-15 09:03:16 +0000 |
|---|---|---|
| committer | torset | 2009-01-15 09:03:16 +0000 |
| commit | 7347e8f3e2715fcea8b2bcacdecd4ad32a2c691f (patch) | |
| tree | 305d973e71e72513072f03861dcbf0de84460d74 /src/auxiliaryFunctions/interfaces/int_size.h | |
| parent | 5a0b1a8aafdbad657ab35b427c3fdbf2e104aef0 (diff) | |
| download | scilab2c-7347e8f3e2715fcea8b2bcacdecd4ad32a2c691f.tar.gz scilab2c-7347e8f3e2715fcea8b2bcacdecd4ad32a2c691f.tar.bz2 scilab2c-7347e8f3e2715fcea8b2bcacdecd4ad32a2c691f.zip | |
add interfaces
Diffstat (limited to 'src/auxiliaryFunctions/interfaces/int_size.h')
| -rw-r--r-- | src/auxiliaryFunctions/interfaces/int_size.h | 71 |
1 files changed, 71 insertions, 0 deletions
diff --git a/src/auxiliaryFunctions/interfaces/int_size.h b/src/auxiliaryFunctions/interfaces/int_size.h new file mode 100644 index 00000000..2608bc81 --- /dev/null +++ b/src/auxiliaryFunctions/interfaces/int_size.h @@ -0,0 +1,71 @@ +/* + * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab + * Copyright (C) 2008-2008 - INRIA - Bruno JOFRET + * + * 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 + * + */ +/* ADDED BY NUTRICATO, BUT WAITING FOR THE AUTOMATIC GENERATION OF IT + AS SHOWN BELOW MANY CASES ARE MISSING. SCALAR RANDOM GENERATOR NOT + IMPLEMENTED YET, SEE DRANDS.C +*/ + +#ifndef __INT_SIZE_H__ +#define __INT_SIZE_H__ + +#define s0sizes2(in,out) out[0]=1.0f;out[1]=1.0f; + +#define d0sized2(in,out) out[0]=1.0;out[1]=1.0; + +#define c0sizes2(in,out) out[0]=1.0f;out[1]=1.0f; + +#define z0sized2(in,out) out[0]=1.0;out[1]=1.0; + +#define s2sizes2(in,size,out) out[0]=size[0];out[1]=size[1]; + +#define d2sized2(in,size,out) out[0]=size[0];out[1]=size[1]; + +#define c2sizes2(in,size,out) out[0]=size[0];out[1]=size[1]; + +#define z2sized2(in,size,out) out[0]=size[0];out[1]=size[1]; + +#define s0sizes0s0(in,out1,out2) out1=1.0f;out2=1.0f; + +#define d0sized0d0(in,out1,out2) out1=1.0;out2=1.0; + +#define c0sizes0s0(in,out1,out2) out1=1.0f;out2=1.0f; + +#define z0sized0d0(in,out1,out2) out1=1.0;out2=1.0; + +#define s2sizes0s0(in,size,out1,out2) out1=size[0];out2=size[1]; + +#define d2sized0d0(in,size,out1,out2) out1=size[0];out2=size[1]; + +#define c2sizes0s0(in,size,out1,out2) out1=size[0];out2=size[1]; + +#define z2sized0d0(in,size,out1,out2) out1=size[0];out2=size[1]; + +#define s0s0sizes0(in1,in2) 1.0f + +#define d0d0sized0(in1,in2) 1. + +#define c0s0sizes0(in1,in2) 1.0f + +#define z0d0sized0(in1,in2) 1. + +#define s2s0sizes0(in1,size,in2) (in2==1) ? size[0] : size[1] + +#define d2d0sized0(in1,size,in2) (in2==1) ? size[0] : size[1] + +#define c2s0sizes0(in1,size,in2) (in2==1) ? size[0] : size[1] + +#define z2d0sized0(in1,size,in2) (in2==1) ? size[0] : size[1] + + +#endif /* !__INT_SIZE_H__ */ + + |