Index: /issm/trunk/scripts/historyISSM.m
===================================================================
--- /issm/trunk/scripts/historyISSM.m	(revision 5109)
+++ /issm/trunk/scripts/historyISSM.m	(revision 5110)
@@ -1,17 +1,11 @@
-%  --  startup --
-startup;
-system('ln -s $ISSM_DIR/startup.m .'); startup;
 %  --  vim --
-!vim configuration.m
 !vim runme.m
 %  --  tests  --
-md=runme('analysis_type',DiagnosticSolutionEnum);
-md=runme('analysis_type',DiagnosticSolutionEnum,'parallel',1);
-runme('analysis_type',[DiagnosticSolutionEnum]);
+md=runme('id',101);
+runme('id',[101]);
 %  --  tweak parameters --
 md.numberofelements
 md.numberofgrids
 %  --  model set up  --
-md=model;
 md=mesh(md,'DomainOutline.exp',5000);
 md=geography(md,'','');
@@ -19,6 +13,6 @@
 md=parameterize(md,'Antarctica.par');
 md=extrude(md,8,1);
+md=setelementstype(md,'macayeal','all');
 md=setelementstype(md,'pattyn','all','stokes','all');
-md=setelementstype(md,'macayeal','all');
 %  --  execution --
 md=solve(md,'analysis_type',ThermalSolutionEnum,'batch','yes');
@@ -30,4 +24,3 @@
 md=tres(md,DiagnosticSolutionEnum);
 %  --  plots  --
-plotmodel(md,'data','vel')
-plotmodel(md,'data',md.results.diagnostic.vel)
+plotmodel(md,'data',md.results.DiagnosticSolution.vel)