Changeset 32 for issm/trunk/src/m/solutions/dakota/setupdesign/setupdrag.m

Timestamp:

04/24/09 10:38:58 (16 years ago)

Author:

Mathieu Morlighem

Message:

initial input from ice1

File:

• issm/trunk/src/m/solutions/dakota/setupdesign/setupdrag.m (modified) (1 diff)

issm/trunk/src/m/solutions/dakota/setupdesign/setupdrag.m ¶

@@ -1 @@
-function dvar=setupdrag(md,dvar,variables)
+function dvar=setupdrag(dvar,variables,params,varargin)
+
+for i=1:length(varargin)
+    if strcmp(class(varargin{i}),'model')
+        md=varargin{i};
+        break;
+    end
+end
 
 %ok, dealing with semi-discrete distributed variable. Distribute according to how many