formated source documentation pattern for generating docs

1 files changed, 16 insertions, 15 deletions

diff --git a/macros/idst1.sci b/macros/idst1.sci
index f7fdc6d..9b6d3e4 100644
--- a/macros/idst1.sci
+++ b/macros/idst1.sci
@@ -1,19 +1,20 @@
-/*Description
-        This function computes the inverse type I discrete sine transform of X If N is given,
-        then X is padded or trimmed to length N before computing the transform.
-        If X is a matrix, compute the transform along the columns of the the matrix.
-Calling Sequence
-        Y = idst1(X)
-        Y = idst1(X, N)
-Parameters
-        X: Matrix or integer
-        N: If N is given, then X is padded or trimmed to length N before computing the transform.
-Examples
-        idst1([1,3,6])
-    ans = 
-         3.97487  -2.50000   0.97487 */
 function x = idst1 (y, n)
-  nargin=argn(2)
+// Description
+//         This function computes the inverse type I discrete sine transform of X If N is given,
+//         then X is padded or trimmed to length N before computing the transform.
+//         If X is a matrix, compute the transform along the columns of the the matrix.
+// Calling Sequence
+//         Y = idst1(X)
+//         Y = idst1(X, N)
+// Parameters
+//         X: Matrix or integer
+//         N: If N is given, then X is padded or trimmed to length N before computing the transform.
+// Examples
+//         idst1([1,3,6])
+//     ans = 
+//          3.97487  -2.50000   0.97487 
+
+        nargin=argn(2)
   if (nargin < 1 || nargin > 2)
     error("invalid input arguments")
   end