Mercurial > repos > public > sbplib

annotate print_issparse.m @ 742:08f3ffe63f48 feature/poroelastic Heimisson2018 elastic1.0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add metric scale factors to properties in heat and elastic curvilinear
author Martin Almquist <malmquist@stanford.edu>
date Fri, 11 May 2018 13:11:32 -0700
parents 54d3ab296ba0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
1 function print_issparse(A)
40
54d3ab296ba0 Added Dictionary class. Added string conversions for a bunch of types. Deprecated some replaced functions.
Jonatan Werpers <jonatan@werpers.com>
parents: 0
diff changeset
2 warning('Deprecated! Use printExpr() instead!');
0
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
3 b = issparse(A);
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
4 if b
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
5 s = 'true';
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
6 else
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
7 s = 'false';
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
8 end
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
9 fprintf('%8s is sparse: %s\n',inputname(1),s);
48b6fb693025 Initial commit.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
10 end