Mercurial > hg > octave-lyh
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\ |