comparison default_field.m @ 1018:eca4d9df9365 feature/advectionRV

Merge with default for latest changes
author Vidar Stiernström <vidar.stiernstrom@it.uu.se>
date Tue, 11 Dec 2018 17:31:28 +0100
parents d1c13505182a
children
comparison
equal deleted inserted replaced
1017:2d7c1333bd6c 1018:eca4d9df9365
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