Mercurial > repos > public > sbplib
view findFieldWidth.m @ 663:b45ec2b28cc2 feature/poroelastic
First implementation of elastic shear operator with free boundary BC.
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Thu, 14 Dec 2017 13:54:20 -0800 |
parents | 30ae48efc7ae |
children |
line wrap: on
line source
% Calculates the maximum field width needed width fprintf for a given format fmt for the values in A % A = [1.13232 10.233 1.1]; % width = findFieldWidth('%.2f',A); % Gives wdith = 5 function width = findFieldWidth(fmt, A) width = 0; for i = 1:numel(A) elem = A(i); if iscell(elem) elem = elem{1}; end str = sprintf(fmt,elem); width = max(width,length(str)); end end