Class TModflowETS_Writer

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TModflowETS_Writer = class(TCustomTransientArrayWriter)

Description

no description available, TCustomTransientArrayWriter description follows
no description available, TCustomParameterTransientWriter description follows
no description available, TCustomTransientWriter description follows

TCustomTransientWriter is used to export input files for MODFLOW for packages with time-varying data.

Hierarchy

Overview

Fields

Private NPETS: integer;
Private NETSEG: integer;
Private NETSOP: integer;
Private FDepthSurface: TList;
Private FPriorDepthFractionArray: TDataArray;
Private FPriorRateFractionArray: TDataArray;
Private FEtsPackage: TEtsPackageSelection;

Methods

Private procedure WriteDataSet1;
Private procedure WriteDataSets2And3;
Private procedure WriteDataSets4To11;
Private procedure WriteCells(CellList: TList; const DataSetIdentifier, VariableIdentifiers: string);
Private procedure WriteEvapotranspirationSurface(CellList: TList);
Private procedure WriteExtinctionDepth(CellList: TList);
Private procedure WriteDepthFraction(CellList: TList; SegmentIndex: integer);
Private procedure WriteRateFraction(CellList: TList; SegmentIndex: integer);
Private procedure CheckDepthFraction(NewArray: TDataArray; SegmentIndex: Integer);
Private procedure CheckRateFraction(NewArray: TDataArray; SegmentIndex: Integer);
Protected function CellType: TValueCellType; override;
Protected function Prefix: string; override;
Protected class function Extension: string; override;
Protected function GetBoundary(ScreenObject: TScreenObject): TModflowBoundary; override;
Protected function Package: TModflowPackageSelection; override;
Protected function ParameterType: TParameterType; override;
Protected procedure WriteStressPeriods(const VariableIdentifiers, DataSetIdentifier, DS5, D7PNameIname, D7PName: string); override;
Protected procedure Evaluate; override;
Public Constructor Create(Model: TCustomModel; EvaluationType: TEvaluationType); override;
Public Destructor Destroy; override;
Public procedure WriteFile(const AFileName: string);
Public procedure UpdateDisplay(TimeLists: TModflowBoundListOfTimeLists);

Description

Fields

Private NPETS: integer;
 
Private NETSEG: integer;
 
Private NETSOP: integer;
 
Private FDepthSurface: TList;
 
Private FPriorDepthFractionArray: TDataArray;
 
Private FPriorRateFractionArray: TDataArray;
 
Private FEtsPackage: TEtsPackageSelection;
 

Methods

Private procedure WriteDataSet1;
 
Private procedure WriteDataSets2And3;
 
Private procedure WriteDataSets4To11;
 
Private procedure WriteCells(CellList: TList; const DataSetIdentifier, VariableIdentifiers: string);
 
Private procedure WriteEvapotranspirationSurface(CellList: TList);
 
Private procedure WriteExtinctionDepth(CellList: TList);
 
Private procedure WriteDepthFraction(CellList: TList; SegmentIndex: integer);
 
Private procedure WriteRateFraction(CellList: TList; SegmentIndex: integer);
 
Private procedure CheckDepthFraction(NewArray: TDataArray; SegmentIndex: Integer);
 
Private procedure CheckRateFraction(NewArray: TDataArray; SegmentIndex: Integer);
 
Protected function CellType: TValueCellType; override;
 
Protected function Prefix: string; override;
 
Protected class function Extension: string; override;
 
Protected function GetBoundary(ScreenObject: TScreenObject): TModflowBoundary; override;
 
Protected function Package: TModflowPackageSelection; override;
 
Protected function ParameterType: TParameterType; override;
 
Protected procedure WriteStressPeriods(const VariableIdentifiers, DataSetIdentifier, DS5, D7PNameIname, D7PName: string); override;
 
Protected procedure Evaluate; override;
 
Public Constructor Create(Model: TCustomModel; EvaluationType: TEvaluationType); override;
 
Public Destructor Destroy; override;

Destroy destroys the current instance of TModflowETS_Writer.

Public procedure WriteFile(const AFileName: string);
 
Public procedure UpdateDisplay(TimeLists: TModflowBoundListOfTimeLists);

UpdateDisplay is used to update the display of transient data used to color the grid.

Parameters
TimeLists
TimeLists is a list of TModflowBoundaryDisplayTimeLists that are to be updated. The order of the TModflowBoundaryDisplayTimeLists in TimeLists is important. The position in the list must be same as the index value used to access TValueCell.RealValue and TValueCell.RealAnnotation. The contents of TimeLists should be in the following order.

  • Evapotranspiration Rate

  • Evapotranspiration Surface

  • Evapotranspiration Depth

  • Depth Fraction 1

  • Et Fraction 1

  • Depth Fraction 2

  • Et Fraction 2

  • ...

  • Depth Fraction N

  • Et Fraction N

ParameterIndicies
The values included in ParameterIndicies indicate which TModflowBoundaryDisplayTimeLists in TimeLists are affected by MODFLOW parameters.

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:45