aryclass.~pas

本代码可以较好地计算腹膜透析中合理的钠浓度

unit AryClass;

interface

uses
   Windows, Messages, SysUtils, Variants, Classes;

type
   TIntStaticArray = array[0..5] of Integer;          //定义整数的一维数组类（无步长变化）
   TIntDynamicArray = array[0..150] of Integer;       //定义整数的一维数组类（有步长变化）
   TRealStaticArray = array[0..5] of Real;            //定义实数的一维数组类（无步长变化）
   TRealDynamicArray = array[0..150] of Real;         //定义实数的一维数组类（有步长变化）

   TRealDynTwoArray = array[0..150,0..150] of Real; //定义实数的二维数组类（有步长变化）
   TRealDynThrArray = array[0..150,0..150,0..1000] of Real; //定义实数的三维数组类（有步长变化）

implementation


end.