Mercurial > repos > public > sbplib
annotate default_struct.m @ 733:a55d3c1e1f83 feature/poroelastic
Bugfix in multiblock.Grid.splitFunc, didnt work for vector-valued functions.
| author | Martin Almquist <malmquist@stanford.edu> |
|---|---|
| date | Wed, 25 Apr 2018 14:44:49 -0700 |
| parents | 46256fffa329 |
| children |
| rev | line source |
|---|---|
|
240
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
1 function default_struct(s, val) |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
2 if evalin('caller',sprintf('~exist(''%s'',''var'')',s)) |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
3 given = []; |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
4 else |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
5 given = evalin('caller', s); |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
6 end |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
7 |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
8 final = copyWithDefault(given, val); |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
9 assignin('caller', s, final); |
|
46256fffa329
Added some stuff for default structs. Improved interface for beam.
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
10 end |
