unit ParmGlobals;

interface

type
   TParmArray  = array[1..10] of single;
   TDigitArray = array[1..10] of integer;
   TCondArray  = array[1..10] of single;

   TParameterInfo = record
      IDString     : string;
      Area         : single;
      SDate, EDate : longint;
      ParmNow, ParmMin, ParmMax, ParmOpt : TParmArray;
      DigitNow, DigitMax                 : TDigitArray;
      BoundaryConditions : array[1..25] of TCondArray;
      BoundaryCondDate   : array[1..25] of longint;
      BoundaryCondCount  : integer;
   end;

implementation

end.
 