Changeset 3587 for issm/trunk/src/m/utils

Timestamp:

04/21/10 09:20:54 (15 years ago)

Author:

jschierm

Message:

QMU with Dakota: implement switch for string_dim vector option.

File:

• issm/trunk/src/m/utils/Array/string_dim.m (modified) (2 diffs)

issm/trunk/src/m/utils/Array/string_dim.m

@@ -2 +2 @@
 %  function to return the string dimension of an array element
 %
-%  function [sdim]=string_dim(a,idim)
+%  function [sdim]=string_dim(a,idim,varargin)
 %
-function [sdim]=string_dim(a,idim)
+function [sdim]=string_dim(a,idim,varargin)
 
 if ~nargin
@@ -33 +33 @@
 %  dimensions, so this won't match Matlab standard output)
 
-if (ndims(a) == 2) && ((size(a,1) == 1) || (size(a,2) == 1))
-    sdim =['(' num2str(idim) ')'];
-    return
+for iarg=1:nargin-2
+    if strcmpi(varargin{iarg},'vector')
+        if (ndims(a) == 2) && ((size(a,1) == 1) || (size(a,2) == 1))
+            sdim =['(' num2str(idim) ')'];
+            return
+        end
+    end
 end