/////////////////////////////////////////////////////////////////////////
// mmp2
// $Revision: 31078 $
// $Date: 2010-11-30 23:38:30 +1100 (Tue, 30 Nov 2010) $
// $LastChangedBy: kasprzyk $
/////////////////////////////////////////////////////////////////////////

/////////////////////////////////////////////////////////////////////////
// Minimal Model Programme
/////////////////////////////////////////////////////////////////////////
"------\nMinimal Model Programme\n";

//////////////////////////////////////
// Example 3: Takes approx 40s
//////////////////////////////////////
"------\nExample 3\n";

F:=FanOfWPS([3,5,6,10]);
time F2:=Resolution(F);
F2;

time X2:=ToricVariety(Rationals(),F2);
time vars, arrows:=MMP(X2);

/////////////////////////////////////////////////////////////////////////
// Finally, clear the caches
/////////////////////////////////////////////////////////////////////////
"------\nClearing caches\n";

CacheClearToricVariety();
CacheClearToricLattice();
