src/IntRank2/SolidSys.cc
/* The following read functions utilize a single spin system index, for system
   being read.  They'll will try to read the spin system parameters that are
   prefixed by [#] where #=idx.  The default value, idx=-1, flags that there 
   is no prefix on the spin system paramters.

	   Input		ssys	: Solid spin system (this)
	   			filename: Input filename
                           or   pset    : Parameter set
                                idx     : Parameter index value used for
                                          prefix [#] in input names
                                warn    : Warning output label
                                           0 = no warnings
                                           1 = warnings
                                          >1 = fatal warnings
	   Output		TF	: Solid spin system filled with
	  				  parameters read from file or pset
	  				  Returns true if read properly      */
The following read functions utilize a single spin system index, for system
being read.  They'll will try to read the spin system parameters that are
prefixed by [#] where #=idx.  The default value, idx=-1, flags that there
is no prefix on the spin system paramters.


The following read functions utilize a single spin system index for system being read . They ' ll will try to read the spin system parameters that are prefixed by [ # ] where # = idx . The default value idx = - 1 flags that there is no prefix on the spin system paramters .
int solid_sys::read(const string &filename, int idx, int warn)
  {
  ParameterSet pset;			
  if(!pset.read(filename, warn?1:0))	
    {					
    if(warn)				
      {
      ssys_error(1, filename, 1);	
      if(warn > 1) ssys_fatal(21);	
      else         ssys_error(21);	
      }
    return 0;
    }
  return read(pset, idx, warn);		
  }
int solid_sys :: read ( const string & filename , int idx , int warn ) { ParameterSet pset ; if ( ! pset . read ( filename , warn ? 1 : 0 ) ) { if ( warn ) { ssys_error ( 1 , filename , 1 ) ; if ( warn > 1 ) ssys_fatal ( 21 ) ; else ssys_error ( 21 ) ; } return 0 ; } return read ( pset , idx , warn ) ; }
The following read functions utilize a single spin system index, for system
being read.
The following read functions utilize a single spin system index for system being read .
// Declare a parameter set // Read in pset from file // If we cannot read the file // then issue warnings as desired //	Problems with file //	Its a fatal error //	or a warning issued // Fill ssys with parameters