source: trunk/SRC/Obsolete/zeroun.pro @ 226

Last change on this file since 226 was 157, checked in by navarro, 18 years ago

header improvements + xxx doc
  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1005 bytes
Line 
1;------------------------------------------------------------
2;------------------------------------------------------------
3;------------------------------------------------------------
4;+
5; @file_comments
6; Send back a vector or a matrix constituate of 0 and 1 in alternation
7;
8; you better use zero_one
9;
10; @obsolete
11;
12; @categories
13; Function, Matrix
14;
15; @param n1 {in}{required} number of elements in the first dimension
16; @param n2 {in}{required} numbre of elements in the second dimension
17;
18; @returns resultat
19;
20; @history Sebastien Masson (smasson\@lodyc.jussieu.fr)
21;                       1/12/98
22;
23; @version $Id$
24;
25;-
26;------------------------------------------------------------
27;------------------------------------------------------------
28;------------------------------------------------------------
29function zeroun, n1,n2
30;
31  compile_opt idl2, strictarrsubs
32;
33  case n_params() of
34      0:return, zero_one()
35      1:return, zero_one(n1)
36      2:return, zero_one(n1, n2)
37  endcase
38
39end
Note: See TracBrowser for help on using the repository browser.