ug4
Loading...
Searching...
No Matches
print.h
Go to the documentation of this file.
1/*
2 * Copyright (c) 2013-2015: G-CSC, Goethe University Frankfurt
3 * Author: Martin Rupp
4 *
5 * This file is part of UG4.
6 *
7 * UG4 is free software: you can redistribute it and/or modify it under the
8 * terms of the GNU Lesser General Public License version 3 (as published by the
9 * Free Software Foundation) with the following additional attribution
10 * requirements (according to LGPL/GPL v3 §7):
11 *
12 * (1) The following notice must be displayed in the Appropriate Legal Notices
13 * of covered and combined works: "Based on UG4 (www.ug4.org/license)".
14 *
15 * (2) The following notice must be displayed at a prominent place in the
16 * terminal output of covered works: "Based on UG4 (www.ug4.org/license)".
17 *
18 * (3) The following bibliography is recommended for citation and must be
19 * preserved in all covered files:
20 * "Reiter, S., Vogel, A., Heppner, I., Rupp, M., and Wittum, G. A massively
21 * parallel geometric multigrid solver on hierarchically distributed grids.
22 * Computing and visualization in science 16, 4 (2013), 151-164"
23 * "Vogel, A., Reiter, S., Rupp, M., Nägel, A., and Wittum, G. UG4 -- a novel
24 * flexible software system for simulating pde based models on high performance
25 * computers. Computing and visualization in science 16, 4 (2013), 165-179"
26 *
27 * This program is distributed in the hope that it will be useful,
28 * but WITHOUT ANY WARRANTY; without even the implied warranty of
29 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
30 * GNU Lesser General Public License for more details.
31 */
32
33#ifndef SMALL_ALGEBRA_PRINT_H_
34#define SMALL_ALGEBRA_PRINT_H_
35
36#include "densematrix.h"
37#include <string>
38#include <sstream>
39#include "common/log.h"
40
41namespace ug{
42template<typename TStorage>
43void MaplePrint(const DenseMatrix<TStorage> &A, const char *name)
44{
45 UG_LOG(name << " = " << MapleString(A));
46}
47
48template<typename TStorage>
49std::string NonzeroString(const DenseMatrix<TStorage> &A, const char *brackets, const char *seperator, int base, const char *name)
50{
51 std::stringstream ss;
52 ss << std::setprecision(9);
53 for(size_t r=0; r<A.num_rows(); ++r)
54 {
55 for(size_t c=0; c<A.num_cols(); ++c)
56 if(A(r, c) != 0.0)
57 ss << name << brackets[0] << r+base << ", " << c+base << brackets[1] << " = " << A(r, c) << seperator;
58 ss << "\n";
59 }
60 return ss.str();
61}
62
63template<typename TStorage>
64std::string
66{
67 std::stringstream ss;
68 ss << name << " = zeros(" << A.num_rows() << ", " << A.num_cols() << ")\n";
69 ss << NonzeroString(A, "()", "\n", 1, name);
70 return ss.str();
71}
72
73
74template<typename TStorage>
75std::string
77{
78 std::stringstream ss;
79 ss << name << " = zeros(" << A.num_rows() << ", " << A.num_cols() << ")\n";
80 ss << NonzeroString(A, "[]", "\n", 1, name);
81 return ss.str();
82}
83
84template<typename TStorage>
85std::string
86CPPString(const DenseMatrix<TStorage> &A, const char *name)
87{
88 std::stringstream ss;
89 ss << name << " = Matrix(" << A.num_rows() << ", " << A.num_cols() << ")\n";
90 ss << NonzeroString(A, "()", ";\n", 0, name);
91 return ss.str();
92}
93
94}
95#endif /* SMALL_ALGEBRA_PRINT_H_ */
location name
Definition checkpoint_util.lua:128
Definition densematrix.h:57
#define UG_LOG(msg)
Definition log.h:367
the ug namespace
std::string MatlabString(const DenseMatrix< TStorage > &A, const char *name)
Definition print.h:65
std::string CPPString(const DenseMatrix< TStorage > &A, const char *name)
Definition print.h:86
std::string JuliaString(const DenseMatrix< TStorage > &A, const char *name)
Definition print.h:76
void MaplePrint(const DenseMatrix< TStorage > &A, const char *name)
Definition print.h:43
std::string NonzeroString(const DenseMatrix< TStorage > &A, const char *brackets, const char *seperator, int base, const char *name)
Definition print.h:49