comparison src/data.cc @ 1488:89c587478067

[project @ 1995-09-26 22:49:48 by jwe]
author jwe
date Tue, 26 Sep 1995 22:49:48 +0000
parents 6550c74777b9
children 0d9e10d10bd7
comparison
equal deleted inserted replaced
1487:eaf4f68d3757 1488:89c587478067
48 48
49 #ifndef ABS 49 #ifndef ABS
50 #define ABS(x) (((x) < 0) ? (-x) : (x)) 50 #define ABS(x) (((x) < 0) ? (-x) : (x))
51 #endif 51 #endif
52 52
53 DEFUN ("all", Fall, Sall, 1, 1, 53 DEFUN ("all", Fall, Sall, 10,
54 "all (X): are all elements of X nonzero?") 54 "all (X): are all elements of X nonzero?")
55 { 55 {
56 Octave_object retval; 56 Octave_object retval;
57 57
58 int nargin = args.length (); 58 int nargin = args.length ();
63 print_usage ("all"); 63 print_usage ("all");
64 64
65 return retval; 65 return retval;
66 } 66 }
67 67
68 DEFUN ("any", Fany, Sany, 1, 1, 68 DEFUN ("any", Fany, Sany, 10,
69 "any (X): are any elements of X nonzero?") 69 "any (X): are any elements of X nonzero?")
70 { 70 {
71 Octave_object retval; 71 Octave_object retval;
72 72
73 int nargin = args.length (); 73 int nargin = args.length ();
132 retval.elem (i, j) = f (x.elem (i, j), y.elem (i, j)); 132 retval.elem (i, j) = f (x.elem (i, j), y.elem (i, j));
133 133
134 return retval; 134 return retval;
135 } 135 }
136 136
137 DEFUN ("atan2", Fatan2, Satan2, 2, 1, 137 DEFUN ("atan2", Fatan2, Satan2, 10,
138 "atan2 (Y, X): atan (Y / X) in range -pi to pi") 138 "atan2 (Y, X): atan (Y / X) in range -pi to pi")
139 { 139 {
140 Octave_object retval; 140 Octave_object retval;
141 141
142 int nargin = args.length (); 142 int nargin = args.length ();
218 print_usage ("atan2"); 218 print_usage ("atan2");
219 219
220 return retval; 220 return retval;
221 } 221 }
222 222
223 DEFUN ("cumprod", Fcumprod, Scumprod, 1, 1, 223 DEFUN ("cumprod", Fcumprod, Scumprod, 10,
224 "cumprod (X): cumulative products") 224 "cumprod (X): cumulative products")
225 { 225 {
226 Octave_object retval; 226 Octave_object retval;
227 227
228 int nargin = args.length (); 228 int nargin = args.length ();
255 print_usage ("cumprod"); 255 print_usage ("cumprod");
256 256
257 return retval; 257 return retval;
258 } 258 }
259 259
260 DEFUN ("cumsum", Fcumsum, Scumsum, 1, 1, 260 DEFUN ("cumsum", Fcumsum, Scumsum, 10,
261 "cumsum (X): cumulative sums") 261 "cumsum (X): cumulative sums")
262 { 262 {
263 Octave_object retval; 263 Octave_object retval;
264 264
265 int nargin = args.length (); 265 int nargin = args.length ();
537 gripe_wrong_type_arg ("diag", a); 537 gripe_wrong_type_arg ("diag", a);
538 538
539 return retval; 539 return retval;
540 } 540 }
541 541
542 DEFUN ("diag", Fdiag, Sdiag, 2, 1, 542 DEFUN ("diag", Fdiag, Sdiag, 10,
543 "diag (X [,k]): form/extract diagonals") 543 "diag (X [,k]): form/extract diagonals")
544 { 544 {
545 Octave_object retval; 545 Octave_object retval;
546 546
547 int nargin = args.length (); 547 int nargin = args.length ();
554 print_usage ("diag"); 554 print_usage ("diag");
555 555
556 return retval; 556 return retval;
557 } 557 }
558 558
559 DEFUN ("prod", Fprod, Sprod, 1, 1, 559 DEFUN ("prod", Fprod, Sprod, 10,
560 "prod (X): products") 560 "prod (X): products")
561 { 561 {
562 Octave_object retval; 562 Octave_object retval;
563 563
564 int nargin = args.length (); 564 int nargin = args.length ();
591 print_usage ("prod"); 591 print_usage ("prod");
592 592
593 return retval; 593 return retval;
594 } 594 }
595 595
596 DEFUN ("size", Fsize, Ssize, 2, 1, 596 DEFUN ("size", Fsize, Ssize, 11,
597 "[m, n] = size (x): return rows and columns of X\n\ 597 "[m, n] = size (x): return rows and columns of X\n\
598 \n\ 598 \n\
599 d = size (x): return number of rows and columns of x as a row vector\n\ 599 d = size (x): return number of rows and columns of x as a row vector\n\
600 \n\ 600 \n\
601 m = size (x, 1): return number of rows in x\n\ 601 m = size (x, 1): return number of rows in x\n\
643 print_usage ("size"); 643 print_usage ("size");
644 644
645 return retval; 645 return retval;
646 } 646 }
647 647
648 DEFUN ("sum", Fsum, Ssum, 1, 1, 648 DEFUN ("sum", Fsum, Ssum, 10,
649 "sum (X): sum of elements") 649 "sum (X): sum of elements")
650 { 650 {
651 Octave_object retval; 651 Octave_object retval;
652 652
653 int nargin = args.length (); 653 int nargin = args.length ();
680 print_usage ("sum"); 680 print_usage ("sum");
681 681
682 return retval; 682 return retval;
683 } 683 }
684 684
685 DEFUN ("sumsq", Fsumsq, Ssumsq, 1, 1, 685 DEFUN ("sumsq", Fsumsq, Ssumsq, 10,
686 "sumsq (X): sum of squares of elements") 686 "sumsq (X): sum of squares of elements")
687 { 687 {
688 Octave_object retval; 688 Octave_object retval;
689 689
690 int nargin = args.length (); 690 int nargin = args.length ();
717 print_usage ("sumsq"); 717 print_usage ("sumsq");
718 718
719 return retval; 719 return retval;
720 } 720 }
721 721
722 DEFUN ("is_struct", Fis_struct, Sis_struct, 1, 1, 722 DEFUN ("is_struct", Fis_struct, Sis_struct, 10,
723 "is_struct (x): return nonzero if x is a structure") 723 "is_struct (x): return nonzero if x is a structure")
724 { 724 {
725 Octave_object retval; 725 Octave_object retval;
726 726
727 int nargin = args.length (); 727 int nargin = args.length ();
739 print_usage ("is_struct"); 739 print_usage ("is_struct");
740 740
741 return retval; 741 return retval;
742 } 742 }
743 743
744 DEFUN ("struct_elements", Fstruct_elements, Sstruct_elements, 1, 1, 744 DEFUN ("struct_elements", Fstruct_elements, Sstruct_elements, 10,
745 "struct_elements (S)\n\ 745 "struct_elements (S)\n\
746 \n\ 746 \n\
747 Return a list of the names of the elements of the structure S.") 747 Return a list of the names of the elements of the structure S.")
748 { 748 {
749 Octave_object retval; 749 Octave_object retval;
774 print_usage ("struct_elements"); 774 print_usage ("struct_elements");
775 775
776 return retval; 776 return retval;
777 } 777 }
778 778
779 DEFUN ("struct_contains", Fstruct_contains, Sstruct_contains, 1, 2, 779 DEFUN ("struct_contains", Fstruct_contains, Sstruct_contains, 10,
780 "struct_contains (S, NAME)\n\ 780 "struct_contains (S, NAME)\n\
781 \n\ 781 \n\
782 return nonzero if S is a structure with element NAME") 782 return nonzero if S is a structure with element NAME")
783 { 783 {
784 Octave_object retval; 784 Octave_object retval;
892 Matrix m (nr, nc, val); 892 Matrix m (nr, nc, val);
893 893
894 return m; 894 return m;
895 } 895 }
896 896
897 DEFUN ("ones", Fones, Sones, 2, 1, 897 DEFUN ("ones", Fones, Sones, 10,
898 "ones (N), ones (N, M), ones (X): create a matrix of all ones") 898 "ones (N), ones (N, M), ones (X): create a matrix of all ones")
899 { 899 {
900 Octave_object retval; 900 Octave_object retval;
901 901
902 int nargin = args.length (); 902 int nargin = args.length ();
921 } 921 }
922 922
923 return retval; 923 return retval;
924 } 924 }
925 925
926 DEFUN ("zeros", Fzeros, Szeros, 2, 1, 926 DEFUN ("zeros", Fzeros, Szeros, 10,
927 "zeros (N), zeros (N, M), zeros (X): create a matrix of all zeros") 927 "zeros (N), zeros (N, M), zeros (X): create a matrix of all zeros")
928 { 928 {
929 Octave_object retval; 929 Octave_object retval;
930 930
931 int nargin = args.length (); 931 int nargin = args.length ();
992 } 992 }
993 993
994 return m; 994 return m;
995 } 995 }
996 996
997 DEFUN ("eye", Feye, Seye, 2, 1, 997 DEFUN ("eye", Feye, Seye, 10,
998 "eye (N), eye (N, M), eye (X): create an identity matrix") 998 "eye (N), eye (N, M), eye (X): create an identity matrix")
999 { 999 {
1000 Octave_object retval; 1000 Octave_object retval;
1001 1001
1002 int nargin = args.length (); 1002 int nargin = args.length ();
1021 } 1021 }
1022 1022
1023 return retval; 1023 return retval;
1024 } 1024 }
1025 1025
1026 DEFUN ("linspace", Flinspace, Slinspace, 2, 1, 1026 DEFUN ("linspace", Flinspace, Slinspace, 10,
1027 "usage: linspace (x1, x2, n)\n\ 1027 "usage: linspace (x1, x2, n)\n\
1028 \n\ 1028 \n\
1029 Return a vector of n equally spaced points between x1 and x2\n\ 1029 Return a vector of n equally spaced points between x1 and x2\n\
1030 inclusive.\n\ 1030 inclusive.\n\
1031 \n\ 1031 \n\