Mercurial > repos > public > sbplib
comparison default_field.m @ 968:a4ad90b37998 feature/poroelastic
Merge with default.
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Sun, 23 Dec 2018 14:39:31 +0100 |
parents | d1c13505182a |
children |
comparison
equal
deleted
inserted
replaced
967:368a2773f78b | 968:a4ad90b37998 |
---|---|
1 function default_field(s, f, val) | 1 function default_field(s, f, val) |
2 if isfield(s,f) | 2 if isfield(s,f) && ~isempty(s.(f)) |
3 return | 3 return |
4 end | 4 end |
5 s.(f) = val; | 5 s.(f) = val; |
6 assignin('caller', inputname(1),s); | 6 assignin('caller', inputname(1),s); |
7 end | 7 end |