Mercurial > octave
comparison src/ov-re-mat.cc @ 4901:35bfb4e0b96b
[project @ 2004-06-14 18:33:02 by jwe]
author | jwe |
---|---|
date | Mon, 14 Jun 2004 18:33:02 +0000 |
parents | 9f7ef92b50b0 |
children | 44046bbaa52c |
comparison
equal
deleted
inserted
replaced
4900:cf470c996819 | 4901:35bfb4e0b96b |
---|---|
36 #include "lo-ieee.h" | 36 #include "lo-ieee.h" |
37 #include "lo-utils.h" | 37 #include "lo-utils.h" |
38 #include "mx-base.h" | 38 #include "mx-base.h" |
39 #include "quit.h" | 39 #include "quit.h" |
40 | 40 |
41 #include "defun.h" | |
41 #include "gripes.h" | 42 #include "gripes.h" |
42 #include "oct-obj.h" | 43 #include "oct-obj.h" |
43 #include "oct-lvalue.h" | 44 #include "oct-lvalue.h" |
44 #include "ops.h" | 45 #include "ops.h" |
45 #include "ov-base.h" | 46 #include "ov-base.h" |
46 #include "ov-base-mat.h" | 47 #include "ov-base-mat.h" |
47 #include "ov-base-mat.cc" | 48 #include "ov-base-mat.cc" |
48 #include "ov-scalar.h" | 49 #include "ov-scalar.h" |
49 #include "ov-re-mat.h" | 50 #include "ov-re-mat.h" |
51 #include "ov-type-conv.h" | |
50 #include "pr-output.h" | 52 #include "pr-output.h" |
51 #include "variables.h" | 53 #include "variables.h" |
52 | 54 |
53 #include "byte-swap.h" | 55 #include "byte-swap.h" |
54 #include "ls-oct-ascii.h" | 56 #include "ls-oct-ascii.h" |
624 { | 626 { |
625 octave_print_internal (os, matrix, pr_as_read_syntax, | 627 octave_print_internal (os, matrix, pr_as_read_syntax, |
626 current_print_indent_level ()); | 628 current_print_indent_level ()); |
627 } | 629 } |
628 | 630 |
631 DEFUN (double, args, , | |
632 "-*- texinfo -*-\n\ | |
633 @deftypefn {Built-in Function} {} double (@var{x})\n\ | |
634 Convert @var{x} to double precision type.\n\ | |
635 @end deftypefn") | |
636 { | |
637 OCTAVE_TYPE_CONV_BODY3 (double, octave_matrix, octave_scalar); | |
638 } | |
639 | |
629 /* | 640 /* |
630 ;;; Local Variables: *** | 641 ;;; Local Variables: *** |
631 ;;; mode: C++ *** | 642 ;;; mode: C++ *** |
632 ;;; End: *** | 643 ;;; End: *** |
633 */ | 644 */ |