Changeset 445

Timestamp:

05/15/09 11:57:10 (15 years ago)

Author:

Mathieu Morlighem

Message:

updated parallel archive + cosmetics

Location:

issm/trunk/test/Verification/IceShelfIceFrontM2d_1

Files:

• Archivecielo_paralleldiagnostic.mat (modified) ( previous)
• runme.m (modified) (1 diff)
• updatearchive.m (modified) (1 diff)

issm/trunk/test/Verification/IceShelfIceFrontM2d_1/runme.m

@@ -50 +50 @@
 
                 %compute solution
-                if strcmpi(package,'cielo_parallel') & strcmpi(solution,'diagnostic'),
-                        md=solve(md,'diagnostic_horiz','cielo');
-                elseif strcmpi(package,'cielo_serial'),
-                        eval(['md=solve(md,''' solution ''',''cielo'');']);
+                if (strcmpi(package,'cielo_serial') | strcmpi(package,'cielo_parallel')),
+                        md=solve(md,solution,'cielo');
                 else
-                        eval(['md=solve(md,''' solution ''',''' package ''');']);
+                        md=solve(md,solution,package);
                 end
 

issm/trunk/test/Verification/IceShelfIceFrontM2d_1/updatearchive.m

@@ -43 +43 @@
 
                 %compute solution
-                if strcmpi(package,'cielo_parallel') & strcmpi(solution,'diagnostic'),
-                        md=solve(md,'diagnostic_horiz','cielo');
-                elseif strcmpi(package,'cielo_serial'),
-                        eval(['md=solve(md,''' solution ''',''cielo'');']);
+                if (strcmpi(package,'cielo_serial') | strcmpi(package,'cielo_parallel')),
+                        md=solve(md,solution,'cielo');
                 else
-                        eval(['md=solve(md,''' solution ''',''' package ''');']);
+                        md=solve(md,solution,package);
                 end