icetransient

PURPOSE ^

ICETRANSIENT - transient solution

SYNOPSIS ^

function md=icetransient(md);

DESCRIPTION ^

ICETRANSIENT - transient solution

   Usage:
      md=icetransient(md)

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function md=icetransient(md);
0002 %ICETRANSIENT - transient solution
0003 %
0004 %   Usage:
0005 %      md=icetransient(md)
0006 
0007 %define global variables
0008 iceglobal
0009 
0010 %determine if run is parallel
0011 if strcmpi(md.cluster,'yes'), cluster=1; else cluster=0;end;
0012 
0013 %for now, only serial support is in
0014 if cluster,
0015     error('icetransient error message: parallel support not implemented yet');
0016 end
0017 
0018 if strcmpi(md.type,'2d'),
0019     md=icetransient2d(md);
0020 else
0021     md=icetransient3d(md);
0022 end

Generated on Sun 29-Mar-2009 20:22:55 by m2html © 2003