summaryrefslogtreecommitdiff
path: root/macros/CFiles/sci2cincludes/SCI2CMacroInterface.h
diff options
context:
space:
mode:
authorSunil Shetye2019-05-16 12:18:48 +0530
committerSunil Shetye2019-05-29 11:08:01 +0530
commit26b77d7593b5ee0792b6b556f5569ea4227c2b02 (patch)
tree8f92052234b01bf39b9c3a6e3cb12b3962d96b1b /macros/CFiles/sci2cincludes/SCI2CMacroInterface.h
parent5a73e6bec4a12db7afae9de300e39256f754d8d3 (diff)
downloadscilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.tar.gz
scilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.tar.bz2
scilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.zip
convert to unix format
Diffstat (limited to 'macros/CFiles/sci2cincludes/SCI2CMacroInterface.h')
-rw-r--r--macros/CFiles/sci2cincludes/SCI2CMacroInterface.h452
1 files changed, 226 insertions, 226 deletions
diff --git a/macros/CFiles/sci2cincludes/SCI2CMacroInterface.h b/macros/CFiles/sci2cincludes/SCI2CMacroInterface.h
index 4e129a76..3815e291 100644
--- a/macros/CFiles/sci2cincludes/SCI2CMacroInterface.h
+++ b/macros/CFiles/sci2cincludes/SCI2CMacroInterface.h
@@ -1,281 +1,281 @@
-/*
-** ----------------------
-** --- Class OPEQUAL. ---
-** ----------------------
-*/
-/* --- Equal. --- */
-#define s0OpEquals0(in) \
+/*
+** ----------------------
+** --- Class OPEQUAL. ---
+** ----------------------
+*/
+/* --- Equal. --- */
+#define s0OpEquals0(in) \
sOpEquals1(in);
-
-#define s2OpEquals2(inptr,insizeptr,outptr) \
+
+#define s2OpEquals2(inptr,insizeptr,outptr) \
sOpEquala1(inptr, insizeptr[0]*insizeptr[1], outptr);
-#define d0OpEquald0(in) \
+#define d0OpEquald0(in) \
dOpEquals1(in);
-
-#define d2OpEquald2(inptr,insizeptr,outptr) \
+
+#define d2OpEquald2(inptr,insizeptr,outptr) \
dOpEquala1(inptr, insizeptr[0]*insizeptr[1], outptr);
-
-/*
-// ---------------------
-// --- Class OPSTAR. ---
-// ---------------------
-*/
-/* --- OpStar. ---
-#define s0s0OpStars0(in1,in2) \
-ssOpStarss1(in1,in2);
-
-#define s0s2OpStars2(in1,inptr2,insizeptr2,outptr) \
+
+/*
+// ---------------------
+// --- Class OPSTAR. ---
+// ---------------------
+*/
+/* --- OpStar. ---
+#define s0s0OpStars0(in1,in2) \
+ssOpStarss1(in1,in2);
+
+#define s0s2OpStars2(in1,inptr2,insizeptr2,outptr) \
ssOpStarsa1(in1,inptr2, insizeptr2[0]*insizeptr2[1], outptr);
-
-#define s2s0OpStars2(inptr2,insizeptr2,in1,outptr) \
+
+#define s2s0OpStars2(inptr2,insizeptr2,in1,outptr) \
ssOpStarsa1(in1,inptr2, insizeptr2[0]*insizeptr2[1], outptr);*/
-/*questa su e' una macro
-
-#define s2s2OpStars2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
-ssOpStaraa1(inptr1,insizeptr1[0],insizeptr1[1], inptr2, insizeptr2[1], outptr);
-
-#define d0d0OpStard0(in1,in2) \
-ddOpStarss1(in1,in2);
-
-#define d0d2OpStard2(in1,inptr2,insizeptr2,outptr) \
+/*questa su e' una macro
+
+#define s2s2OpStars2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
+ssOpStaraa1(inptr1,insizeptr1[0],insizeptr1[1], inptr2, insizeptr2[1], outptr);
+
+#define d0d0OpStard0(in1,in2) \
+ddOpStarss1(in1,in2);
+
+#define d0d2OpStard2(in1,inptr2,insizeptr2,outptr) \
ddOpStarsa1(in1,inptr2, (insizeptr2[0]) * (insizeptr2[1]), outptr)
-
-#define d2d0OpStard2(inptr2,insizeptr2,in1,outptr) \
+
+#define d2d0OpStard2(inptr2,insizeptr2,in1,outptr) \
ddOpStarsa1(in1,inptr2, (insizeptr2[0]) * (insizeptr2[1]), outptr)*/
-/*questa su e' una macro
-
-#define d2d2OpStard2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
-ddOpStaraa1(inptr1,insizeptr1[0],insizeptr1[1], inptr2, insizeptr2[1], outptr);*/
-
-/*
-// ---------------------
-// --- Class OPPLUS. ---
-// ---------------------
-*/
-/* --- OpPlus. ---*/
-/*RN volendo puoi fare una sola macro del tipo sa1() che serve per tutte le operazioni
-#define s0s0OpPluss0(in1,in2) \
-ssOpPlusss1(in1,in2);
-
-#define s0s2OpPluss2(in1,inptr2,insizeptr2,outptr) \
+/*questa su e' una macro
+
+#define d2d2OpStard2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
+ddOpStaraa1(inptr1,insizeptr1[0],insizeptr1[1], inptr2, insizeptr2[1], outptr);*/
+
+/*
+// ---------------------
+// --- Class OPPLUS. ---
+// ---------------------
+*/
+/* --- OpPlus. ---*/
+/*RN volendo puoi fare una sola macro del tipo sa1() che serve per tutte le operazioni
+#define s0s0OpPluss0(in1,in2) \
+ssOpPlusss1(in1,in2);
+
+#define s0s2OpPluss2(in1,inptr2,insizeptr2,outptr) \
ssOpPlussa1(in1,inptr2, insizeptr2[0]*insizeptr2[1], outptr);
-
-#define s2s2OpPluss2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
+
+#define s2s2OpPluss2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
ssOpPlusaa1(inptr1,inptr2, insizeptr1[0]*insizeptr1[1], outptr)
-#define s2s0OpPluss2(inptr2,insizeptr2,in1,outptr) \
+#define s2s0OpPluss2(inptr2,insizeptr2,in1,outptr) \
ssOpPlussa1(in1,inptr2, insizeptr2[0]*insizeptr2[1], outptr);*/
-/*questa su e' una macro
-
-#define d0d0OpPlusd0(in1,in2) \
-ddOpPlusss1(in1,in2);
-
-#define d2d2OpPlusd2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
+/*questa su e' una macro
+
+#define d0d0OpPlusd0(in1,in2) \
+ddOpPlusss1(in1,in2);
+
+#define d2d2OpPlusd2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
ddOpPlusaa1(inptr1,inptr2, insizeptr1[0]*insizeptr1[1], outptr);
-
-#define d0d2OpPlusd2(in1,inptr2,insizeptr2,outptr) \
+
+#define d0d2OpPlusd2(in1,inptr2,insizeptr2,outptr) \
ddOpPlussa1(in1,inptr2, (insizeptr2[0]) * (insizeptr2[1]), outptr)
-
-#define d2d0OpPlusd2(inptr2,insizeptr2,in1,outptr) \
+
+#define d2d0OpPlusd2(inptr2,insizeptr2,in1,outptr) \
ddOpPlussa1(in1,inptr2, (insizeptr2[0]) * (insizeptr2[1]), outptr)*/
-/*questa su e' una macro */
-
-
-/* --- OpDotStar. ---*/
-/*#define s0s0OpDotStars0(in1,in2) \
-ssOpDotStarss1(in1,in2);
-
-#define s0s2OpDotStars2(in1,inptr2,insizeptr2,outptr) \
+/*questa su e' una macro */
+
+
+/* --- OpDotStar. ---*/
+/*#define s0s0OpDotStars0(in1,in2) \
+ssOpDotStarss1(in1,in2);
+
+#define s0s2OpDotStars2(in1,inptr2,insizeptr2,outptr) \
ssOpDotStarsa1(in1,inptr2, insizeptr2[0]*insizeptr2[1], outptr);
-
-#define s2s2OpDotStars2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
+
+#define s2s2OpDotStars2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
ssOpDotStaraa1(inptr1,inptr2, insizeptr1[0]*insizeptr1[1], outptr)
-#define s2s0OpDotStars2(inptr2,insizeptr2,in1,outptr) \
+#define s2s0OpDotStars2(inptr2,insizeptr2,in1,outptr) \
ssOpDotStarsa1(in1,inptr2, insizeptr2[0]*insizeptr2[1], outptr);
-questa su e' una macro */
-
-/*#define d0d0OpDotStard0(in1,in2) \
-ddOpDotStarss1(in1,in2);
-
-#define d2d2OpDotStard2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
+questa su e' una macro */
+
+/*#define d0d0OpDotStard0(in1,in2) \
+ddOpDotStarss1(in1,in2);
+
+#define d2d2OpDotStard2(inptr1,insizeptr1,inptr2,insizeptr2,outptr) \
ddOpDotStaraa1(inptr1,inptr2, insizeptr1[0]*insizeptr1[1], outptr);
-
-#define d0d2OpDotStard2(in1,inptr2,insizeptr2,outptr) \
+
+#define d0d2OpDotStard2(in1,inptr2,insizeptr2,outptr) \
ddOpDotStarsa1(in1,inptr2, (insizeptr2[0]) * (insizeptr2[1]), outptr)
-
-#define d2d0OpDotStard2(inptr2,insizeptr2,in1,outptr) \
+
+#define d2d0OpDotStard2(inptr2,insizeptr2,in1,outptr) \
ddOpDotStarsa1(in1,inptr2, (insizeptr2[0]) * (insizeptr2[1]), outptr)
-questa su e' una macro */
-
-/*
-// ---------------------
-// --- Class ^. ---
-// ---------------------
-*/
-/*RN DA FARE ANCORA forse la si puo' integrare dentro le operazioni OPPLUS*/
-
-/*
-// ---------------------
-// --- Class OPAPEX. ---
-// ---------------------
-*/
-/* --- OpApex. ---
-#define s0OpApexs0(in) \
-sOpApexs(in);
-
-#define d0OpApexd0(in) \
-dOpApexs(in);
-
-#define s2OpApexs2(inptr,insizeptr,outptr) \
+questa su e' una macro */
+
+/*
+// ---------------------
+// --- Class ^. ---
+// ---------------------
+*/
+/*RN DA FARE ANCORA forse la si puo' integrare dentro le operazioni OPPLUS*/
+
+/*
+// ---------------------
+// --- Class OPAPEX. ---
+// ---------------------
+*/
+/* --- OpApex. ---
+#define s0OpApexs0(in) \
+sOpApexs(in);
+
+#define d0OpApexd0(in) \
+dOpApexs(in);
+
+#define s2OpApexs2(inptr,insizeptr,outptr) \
sOpApexa(inptr, insizeptr[0],insizeptr[1], outptr);
-#define d2OpApexd2(inptr,insizeptr,outptr) \
+#define d2OpApexd2(inptr,insizeptr,outptr) \
dOpApexa(inptr, insizeptr[0],insizeptr[1], outptr);
-*/
-/*
-// ---------------------
-// --- Class SIN. ---
-// ---------------------
-*/
-/* --- sin. ---*/ /*
-#define s0sins0(inptr) \
+*/
+/*
+// ---------------------
+// --- Class SIN. ---
+// ---------------------
+*/
+/* --- sin. ---*/ /*
+#define s0sins0(inptr) \
ssins(inptr);
-
-#define d0sind0(inptr) \
+
+#define d0sind0(inptr) \
dsins(inptr);
-
-#define c0sinc0(inptr) \
+
+#define c0sinc0(inptr) \
csins(inptr);
-
-#define z0sinz0(inptr) \
+
+#define z0sinz0(inptr) \
zsins(inptr);
-
-#define s2sins2(inptr,insizeptr,outptr) \
+
+#define s2sins2(inptr,insizeptr,outptr) \
ssina(inptr, insizeptr[0]*insizeptr[1], outptr);
-#define d2sind2(inptr,insizeptr,outptr) \
+#define d2sind2(inptr,insizeptr,outptr) \
dsina(inptr, insizeptr[0]*insizeptr[1], outptr);
-
-#define c2sinc2(inptr,insizeptr,outptr) \
+
+#define c2sinc2(inptr,insizeptr,outptr) \
csina(inptr, insizeptr[0]*insizeptr[1], outptr);
-
-#define z2sinz2(inptr,insizeptr,outptr) \
-zsina(inptr, insizeptr[0]*insizeptr[1], outptr);
- */
-/* --- cos. ---*/ /*
-#define s0coss0(inptr) \
+
+#define z2sinz2(inptr,insizeptr,outptr) \
+zsina(inptr, insizeptr[0]*insizeptr[1], outptr);
+*/
+/* --- cos. ---*/ /*
+#define s0coss0(inptr) \
scoss(inptr);
-
-#define d0cosd0(inptr) \
+
+#define d0cosd0(inptr) \
dcoss(inptr);
-
-#define c0cosc0(inptr) \
+
+#define c0cosc0(inptr) \
ccoss(inptr);
-
-#define z0cosz0(inptr) \
+
+#define z0cosz0(inptr) \
zcoss(inptr);
-
-#define s2coss2(inptr,insizeptr,outptr) \
+
+#define s2coss2(inptr,insizeptr,outptr) \
scosa(inptr, insizeptr[0]*insizeptr[1], outptr);
-#define d2cosd2(inptr,insizeptr,outptr) \
+#define d2cosd2(inptr,insizeptr,outptr) \
dcosa(inptr, insizeptr[0]*insizeptr[1], outptr);
-
-#define c2cosc2(inptr,insizeptr,outptr) \
+
+#define c2cosc2(inptr,insizeptr,outptr) \
ccosa(inptr, insizeptr[0]*insizeptr[1], outptr);
-#define z2cosz2(inptr,insizeptr,outptr) \
+#define z2cosz2(inptr,insizeptr,outptr) \
zcosa(inptr, insizeptr[0]*insizeptr[1], outptr);
- */
-/* --- sinh. ---*/ /*
-#define s0sinhs0(inptr) \
+*/
+/* --- sinh. ---*/ /*
+#define s0sinhs0(inptr) \
ssinhs(inptr);
-
-#define d0sinhd0(inptr) \
+
+#define d0sinhd0(inptr) \
dsinhs(inptr);
-
-#define c0sinhc0(inptr) \
+
+#define c0sinhc0(inptr) \
csinhs(inptr);
-
-#define z0sinhz0(inptr) \
+
+#define z0sinhz0(inptr) \
zsins(inptr);
-
-#define s2sinhs2(inptr,insizeptr,outptr) \
+
+#define s2sinhs2(inptr,insizeptr,outptr) \
ssinha(inptr, insizeptr[0]*insizeptr[1], outptr);
-#define d2sinhd2(inptr,insizeptr,outptr) \
+#define d2sinhd2(inptr,insizeptr,outptr) \
dsinha(inptr, insizeptr[0]*insizeptr[1], outptr);
-
-#define c2sinhc2(inptr,insizeptr,outptr) \
+
+#define c2sinhc2(inptr,insizeptr,outptr) \
csinha(inptr, insizeptr[0]*insizeptr[1], outptr);
-
-#define z2sinhz2(inptr,insizeptr,outptr) \
-zsinha(inptr, insizeptr[0]*insizeptr[1], outptr);
-
+
+#define z2sinhz2(inptr,insizeptr,outptr) \
+zsinha(inptr, insizeptr[0]*insizeptr[1], outptr);
+
+*/
+/*
+// ---------------------
+// --- Class DISP. ---
+// ---------------------
+*//*
+#define s0dispd0(invar) \
+sdisps2 (invar, #invar );
+
+#define d0dispd0(invar) \
+ddisps2 (invar, #invar );
+
+#define c0dispd0(invar) \
+cdisps2 (invar, #invar );
+
+#define z0dispd0(invar) \
+zdisps2 (invar, #invar );
+
+#define s2dispd0(invar,insize) \
+sdispa2 (invar, insize, #invar );
+
+#define d2dispd0(invar,insize) \
+ddispa2 (invar, insize, #invar );
+
+#define c2dispd0(invar,insize) \
+cdispa2 (invar, insize, #invar );
+
+#define z2dispd0(invar,insize) \
+zdispa2 (invar, insize, #invar );
+
+#define i2dispd0(invar,insize) \
+idispa2 (invar, insize, #invar );*/
+/*
+// --------------------
+// --- Class ZEROS. ---
+// --------------------
*/
-/*
-// ---------------------
-// --- Class DISP. ---
-// ---------------------
-*//*
-#define s0dispd0(invar) \
-sdisps2 (invar, #invar );
-
-#define d0dispd0(invar) \
-ddisps2 (invar, #invar );
-
-#define c0dispd0(invar) \
-cdisps2 (invar, #invar );
-
-#define z0dispd0(invar) \
-zdisps2 (invar, #invar );
-
-#define s2dispd0(invar,insize) \
-sdispa2 (invar, insize, #invar );
-
-#define d2dispd0(invar,insize) \
-ddispa2 (invar, insize, #invar );
-
-#define c2dispd0(invar,insize) \
-cdispa2 (invar, insize, #invar );
-
-#define z2dispd0(invar,insize) \
-zdispa2 (invar, insize, #invar );
-
-#define i2dispd0(invar,insize) \
-idispa2 (invar, insize, #invar );*/
-/*
-// --------------------
-// --- Class ZEROS. ---
-// --------------------
-*/
-/* --- ones. ---*/ /*
-#define d0d0onesd2(inptr1,inptr2,outptr) \
-ddonesss1(inptr1, inptr2, outptr);
-
-#define onesd0() \
-1
-
-#define d0onesd0(in1) \
-1
-
-#define d2onesd2(inptr,insizeptr,outptr) \
-ddonesss1(insizeptr[0], insizeptr[1], outptr);
-
-#define d0d0onesd2(inptr1,inptr2,outptr) \
-ddonesss1(inptr1, inptr2, outptr);
-
-#define s0s0oness2(inptr1,inptr2,outptr) \
-ssonesss1(inptr1, inptr2, outptr);
-
-#define oness0() \
-1
-
-#define s0oness0(in1) \
-1
-
-#define s2oness2(inptr,insizeptr,outptr) \
+/* --- ones. ---*/ /*
+#define d0d0onesd2(inptr1,inptr2,outptr) \
+ddonesss1(inptr1, inptr2, outptr);
+
+#define onesd0() \
+1
+
+#define d0onesd0(in1) \
+1
+
+#define d2onesd2(inptr,insizeptr,outptr) \
+ddonesss1(insizeptr[0], insizeptr[1], outptr);
+
+#define d0d0onesd2(inptr1,inptr2,outptr) \
+ddonesss1(inptr1, inptr2, outptr);
+
+#define s0s0oness2(inptr1,inptr2,outptr) \
+ssonesss1(inptr1, inptr2, outptr);
+
+#define oness0() \
+1
+
+#define s0oness0(in1) \
+1
+
+#define s2oness2(inptr,insizeptr,outptr) \
ssonesss1(insizeptr[0], insizeptr[1], outptr);
*/