Mercurial > repos > public > sbplib
view findFieldWidth.m @ 739:8efc04e97da4 feature/poroelastic
Add Elastic curvilinear. Traction and Dirichlet BC working.
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Mon, 07 May 2018 14:35:54 -0700 |
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