Class TSutraMergedTimeList

Unit

SutraBoundariesUnit

Declaration

type TSutraMergedTimeList = class(TCustomTimeList)

Description

Merge TSutraTimeLists as follows.

1. Get a list of TSutraTimeLists in the same order as the TScreenObjects that define them.

2. Get a combined list of all the times in the TSutraTimeLists

3. Merge each TSutraTimeList in turn, into the combined list. For each data set in each TSutraTimeList, apply from its start time up until but not including the next start time included in the TSutraTimeList.

3a. With specified pressures and specified temperature/concentration, use the value in the last TSutraTimeList.

3b. With specified flux, add the flux to the existing flux and compute a weighted average of the injection concentrations or temperatures.

3c. With solute/energy sources, add the solute/energy source to the existing solute/energy sources.

Merging TSutraTimeLists is done in UpdateMergeLists.

TSutraMergedTimeList can be used for both export and display.

Hierarchy

• TObject
• TCustomTimeList
• TSutraMergedTimeList

Overview

Fields

FOnInitialize: TNotifyEvent;

Methods

	procedure SetOnInitialize(const Value: TNotifyEvent);
	procedure Initialize; override;

Properties

property OnInitialize: TNotifyEvent read FOnInitialize write SetOnInitialize;

Description

Fields

	FOnInitialize: TNotifyEvent;
FOnGetUseList: TOnGetUseList;

Methods

	procedure SetOnInitialize(const Value: TNotifyEvent);

	procedure Initialize; override;

Properties

	property OnInitialize: TNotifyEvent read FOnInitialize write SetOnInitialize;
property OnGetUseList: TOnGetUseList read FOnGetUseList write FOnGetUseList;