Mercurial > hg > octave-lyh

comparison src/ls-mat4.h @ 4634:79fe96966ca0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-11-19 21:22:39 by jwe]
author jwe
date Wed, 19 Nov 2003 21:23:19 +0000
parents
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
4633:d95dd6ae89fd 4634:79fe96966ca0
1 /*
2
3 Copyright (C) 2003 John W. Eaton
4
5 This file is part of Octave.
6
7 Octave is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by the
9 Free Software Foundation; either version 2, or (at your option) any
10 later version.
11
12 Octave is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with Octave; see the file COPYING. If not, write to the Free
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
20
21 */
22
23 #if !defined (octave_ls_mat4_h)
24 #define octave_ls_mat4 1
25
26 extern oct_mach_info::float_format
27 mopt_digit_to_float_format (int mach);
28
29 extern int
30 float_format_to_mopt_digit (oct_mach_info::float_format flt_fmt);
31
32 extern int
33 read_mat_file_header (std::istream& is, bool& swap, FOUR_BYTE_INT& mopt,
34 FOUR_BYTE_INT& nr, FOUR_BYTE_INT& nc,
35 FOUR_BYTE_INT& imag, FOUR_BYTE_INT& len,
36 int quiet = 0);
37
38 extern std::string
39 read_mat_binary_data (std::istream& is, const std::string& filename,
40 octave_value& tc);
41
42 extern bool
43 save_mat_binary_data (std::ostream& os, const octave_value& tc,
44 const std::string& name) ;
45
46 #endif
47
48 /*
49 ;;; Local Variables: ***
50 ;;; mode: C++ ***
51 ;;; End: ***
52 */