2003-08-19 13:00:56 +00:00
|
|
|
/**
|
2007-04-25 03:01:35 +00:00
|
|
|
* \file InsetMathMatrix.cpp
|
2003-08-19 13:00:56 +00:00
|
|
|
* This file is part of LyX, the document processor.
|
|
|
|
* Licence details can be found in the file COPYING.
|
|
|
|
*
|
2008-11-14 15:58:50 +00:00
|
|
|
* \author André Pönitz
|
2003-08-19 13:00:56 +00:00
|
|
|
*
|
|
|
|
* Full author contact details are available in file CREDITS.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <config.h>
|
|
|
|
|
2006-09-17 09:14:18 +00:00
|
|
|
#include "InsetMathMatrix.h"
|
2007-04-26 16:05:57 +00:00
|
|
|
#include "MathData.h"
|
2006-10-22 10:15:23 +00:00
|
|
|
#include "MathStream.h"
|
2001-11-09 08:35:57 +00:00
|
|
|
|
2010-03-31 19:59:09 +00:00
|
|
|
#include "support/convert.h"
|
|
|
|
|
|
|
|
using namespace std;
|
2006-10-21 00:16:43 +00:00
|
|
|
|
|
|
|
namespace lyx {
|
|
|
|
|
2017-07-03 17:53:14 +00:00
|
|
|
InsetMathMatrix::InsetMathMatrix(InsetMathGrid const & p,
|
2009-12-16 17:01:09 +00:00
|
|
|
docstring const & left, docstring const & right)
|
|
|
|
: InsetMathGrid(p), left_(left), right_(right)
|
2001-11-09 08:35:57 +00:00
|
|
|
{}
|
|
|
|
|
|
|
|
|
2007-08-30 18:03:17 +00:00
|
|
|
Inset * InsetMathMatrix::clone() const
|
2001-11-09 08:35:57 +00:00
|
|
|
{
|
2007-08-30 18:03:17 +00:00
|
|
|
return new InsetMathMatrix(*this);
|
2001-11-09 08:35:57 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2006-09-16 18:11:38 +00:00
|
|
|
void InsetMathMatrix::write(WriteStream & os) const
|
2001-11-09 08:35:57 +00:00
|
|
|
{
|
2006-09-16 18:11:38 +00:00
|
|
|
InsetMathGrid::write(os);
|
2001-11-09 08:35:57 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2006-09-16 18:11:38 +00:00
|
|
|
void InsetMathMatrix::normalize(NormalStream & os) const
|
2001-11-09 08:35:57 +00:00
|
|
|
{
|
2006-09-16 18:11:38 +00:00
|
|
|
InsetMathGrid::normalize(os);
|
2001-11-09 08:35:57 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2006-09-16 18:11:38 +00:00
|
|
|
void InsetMathMatrix::maple(MapleStream & os) const
|
2001-11-09 08:35:57 +00:00
|
|
|
{
|
|
|
|
os << "matrix(" << int(nrows()) << ',' << int(ncols()) << ",[";
|
|
|
|
for (idx_type idx = 0; idx < nargs(); ++idx) {
|
|
|
|
if (idx)
|
|
|
|
os << ',';
|
|
|
|
os << cell(idx);
|
|
|
|
}
|
|
|
|
os << "])";
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2006-09-16 18:11:38 +00:00
|
|
|
void InsetMathMatrix::maxima(MaximaStream & os) const
|
2002-10-28 17:15:19 +00:00
|
|
|
{
|
|
|
|
os << "matrix(";
|
|
|
|
for (row_type row = 0; row < nrows(); ++row) {
|
|
|
|
if (row)
|
|
|
|
os << ',';
|
|
|
|
os << '[';
|
|
|
|
for (col_type col = 0; col < ncols(); ++col) {
|
|
|
|
if (col)
|
|
|
|
os << ',';
|
|
|
|
os << cell(index(row, col));
|
|
|
|
}
|
|
|
|
os << ']';
|
|
|
|
}
|
|
|
|
os << ')';
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2006-09-16 18:11:38 +00:00
|
|
|
void InsetMathMatrix::mathematica(MathematicaStream & os) const
|
2006-09-02 01:57:36 +00:00
|
|
|
{
|
|
|
|
os << '{';
|
|
|
|
for (row_type row = 0; row < nrows(); ++row) {
|
|
|
|
if (row)
|
|
|
|
os << ',';
|
|
|
|
os << '{';
|
|
|
|
for (col_type col = 0; col < ncols(); ++col) {
|
|
|
|
if (col)
|
|
|
|
os << ',';
|
|
|
|
os << cell(index(row, col));
|
|
|
|
}
|
|
|
|
os << '}';
|
|
|
|
}
|
|
|
|
os << '}';
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2009-12-31 15:46:39 +00:00
|
|
|
void InsetMathMatrix::mathmlize(MathStream & os) const
|
2001-11-09 08:35:57 +00:00
|
|
|
{
|
2009-12-16 17:01:09 +00:00
|
|
|
os << "<mo form='prefix' fence='true' stretchy='true' symmetric='true' lspace='thinmathspace'>"
|
2017-07-03 17:53:14 +00:00
|
|
|
<< convertDelimToXMLEscape(left_)
|
2016-06-30 02:52:27 +00:00
|
|
|
<< "</mo>"
|
|
|
|
<< MTag("mtable");
|
2009-12-16 16:43:26 +00:00
|
|
|
for (row_type row = 0; row < nrows(); ++row) {
|
|
|
|
os << MTag("mtr");
|
2015-05-17 11:43:37 +00:00
|
|
|
for (col_type col = 0; col < ncols(); ++col) {
|
|
|
|
idx_type const i = index(row, col);
|
|
|
|
if (cellinfo_[i].multi_ != CELL_PART_OF_MULTICOLUMN) {
|
|
|
|
col_type const cellcols = ncellcols(i);
|
|
|
|
ostringstream attr;
|
|
|
|
if (cellcols > 1)
|
|
|
|
attr << "columnspan='" << cellcols << '\'';
|
|
|
|
os << MTag("mtd", attr.str()) << cell(i) << ETag("mtd");
|
|
|
|
}
|
|
|
|
}
|
2009-12-16 16:43:26 +00:00
|
|
|
os << ETag("mtr");
|
|
|
|
}
|
|
|
|
os << ETag("mtable");
|
2009-12-16 17:01:09 +00:00
|
|
|
os << "<mo form='postfix' fence='true' stretchy='true' symmetric='true' lspace='thinmathspace'>"
|
2017-07-03 17:53:14 +00:00
|
|
|
<< convertDelimToXMLEscape(right_)
|
2016-06-30 02:52:27 +00:00
|
|
|
<< "</mo>";
|
2001-11-09 08:35:57 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2010-03-31 19:59:09 +00:00
|
|
|
void InsetMathMatrix::htmlize(HtmlStream & os) const
|
|
|
|
{
|
|
|
|
os << MTag("table", "class='matrix'") << '\n';
|
|
|
|
|
|
|
|
// we do not print the delimiters but instead try to hack them
|
|
|
|
string const rows = convert<string>(nrows());
|
2017-07-03 17:53:14 +00:00
|
|
|
string const lattrib =
|
2010-03-31 19:59:09 +00:00
|
|
|
"class='ldelim' rowspan='" + rows + "'";
|
2017-07-03 17:53:14 +00:00
|
|
|
string const rattrib =
|
2010-03-31 19:59:09 +00:00
|
|
|
"class='rdelim' rowspan='" + rows + "'";
|
2017-07-03 17:53:14 +00:00
|
|
|
|
2010-03-31 19:59:09 +00:00
|
|
|
for (row_type row = 0; row < nrows(); ++row) {
|
|
|
|
os << MTag("tr") << '\n';
|
|
|
|
if (row == 0)
|
|
|
|
os << MTag("td", lattrib) << ETag("td") << '\n';
|
2015-05-17 11:43:37 +00:00
|
|
|
for (col_type col = 0; col < ncols(); ++col) {
|
|
|
|
idx_type const i = index(row, col);
|
|
|
|
if (cellinfo_[i].multi_ != CELL_PART_OF_MULTICOLUMN) {
|
|
|
|
col_type const cellcols = ncellcols(i);
|
|
|
|
ostringstream attr;
|
|
|
|
if (cellcols > 1)
|
|
|
|
attr << "colspan='" << cellcols
|
|
|
|
<< '\'';
|
|
|
|
os << MTag("td", attr.str()) << cell(i)
|
|
|
|
<< ETag("td") << '\n';
|
|
|
|
}
|
|
|
|
}
|
2010-03-31 19:59:09 +00:00
|
|
|
if (row == 0)
|
|
|
|
os << MTag("td", rattrib) << ETag("td") << '\n';
|
|
|
|
os << ETag("tr") << '\n';
|
|
|
|
}
|
|
|
|
os << ETag("table") << '\n';
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2006-09-16 18:11:38 +00:00
|
|
|
void InsetMathMatrix::octave(OctaveStream & os) const
|
2001-11-09 08:35:57 +00:00
|
|
|
{
|
|
|
|
os << '[';
|
|
|
|
for (row_type row = 0; row < nrows(); ++row) {
|
|
|
|
if (row)
|
|
|
|
os << ';';
|
|
|
|
os << '[';
|
2002-03-21 17:42:56 +00:00
|
|
|
for (col_type col = 0; col < ncols(); ++col)
|
2001-11-09 08:35:57 +00:00
|
|
|
os << cell(index(row, col)) << ' ';
|
|
|
|
os << ']';
|
|
|
|
}
|
|
|
|
os << ']';
|
|
|
|
}
|
2006-10-21 00:16:43 +00:00
|
|
|
|
|
|
|
|
|
|
|
} // namespace lyx
|