Class TModflowWEL_Writer

Unit

ModflowWellWriterUnit

Declaration

type TModflowWEL_Writer = class(TCustomListWriter)

Description

TCustomListWriter is used as a base class for writing typical boundary condition files that allow for both parameter and non-parameter cells.

Hierarchy

• TObject
• TCustomFileWriter
• TCustomModflowWriter
• TCustomPackageWriter
• TCustomTransientWriter
• TCustomParameterTransientWriter
• TCustomListWriter
• TModflowWEL_Writer

Overview

Fields

	NPWEL: integer;
	MXL: integer;
	FNameOfFile: string;

Methods

	procedure WriteDataSet1;
	procedure WriteDataSet2;
	procedure WriteDataSet2b;
	procedure WriteDataSets3And4;
	procedure WriteDataSets5To7;
	function CellType: TValueCellType; override;
	class function Extension: string; override;
	function GetBoundary(ScreenObject: TScreenObject): TModflowBoundary; override;
	function Package: TModflowPackageSelection; override;
	function ParameterType: TParameterType; override;
	procedure WriteParameterCells(CellList: TValueCellList; NLST: Integer; const VariableIdentifiers, DataSetIdentifier: string; AssignmentMethod: TUpdateMethod; MultiplierArrayNames: TTransientMultCollection; ZoneArrayNames: TTransientZoneCollection); override;
	procedure WriteCell(Cell: TValueCell; const DataSetIdentifier, VariableIdentifiers: string); override;
	procedure WriteFile(const AFileName: string);

Description

Fields

	NPWEL: integer;

	MXL: integer;

	FNameOfFile: string;

Methods

	procedure WriteDataSet1;

	procedure WriteDataSet2;

	procedure WriteDataSet2b;

	procedure WriteDataSets3And4;

	procedure WriteDataSets5To7;

	function CellType: TValueCellType; override;
procedure ListEvaluate;

	class function Extension: string; override;

	function GetBoundary(ScreenObject: TScreenObject): TModflowBoundary; override;

	function Package: TModflowPackageSelection; override;

	function ParameterType: TParameterType; override;

	procedure WriteParameterCells(CellList: TValueCellList; NLST: Integer; const VariableIdentifiers, DataSetIdentifier: string; AssignmentMethod: TUpdateMethod; MultiplierArrayNames: TTransientMultCollection; ZoneArrayNames: TTransientZoneCollection); override;

	procedure WriteCell(Cell: TValueCell; const DataSetIdentifier, VariableIdentifiers: string); override;

	procedure WriteFile(const AFileName: string);