10.11.2015 Views

maXbox3 3.9.9.195 14/05/2015 08:37:17 AM

maXbox3 3.9.9.80 13.11.2013 11:25:53

maXbox3 3.9.9.80 13.11.2013 11:25:53

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

<strong>maXbox3</strong> <strong>3.9.9.195</strong><br />

<strong>14</strong>/<strong>05</strong>/<strong>2015</strong> <strong>08</strong>:<strong>37</strong>:<strong>17</strong> <strong>AM</strong><br />

20<strong>05</strong>4: Create(FileName:String;Mode:Word)<br />

20<strong>05</strong>5: Create(Instance:THandle;ResName:String;ResType:PChar)<br />

20<strong>05</strong>6: Create(Stream : TStream)<br />

20<strong>05</strong>7: Create1( ADataset : TDataset);<br />

20<strong>05</strong>8: Create1(const FileHandle:THandle;const Name:string;Protect:Cardinal;const MaximumSize:Int64;const<br />

SecAttr:PSecurityAttributes);<br />

20<strong>05</strong>9: Create1( const FileName : string; const AIndexOption : TJclMappedTextReaderIndex);<br />

20060: Create2( Other : TObject);<br />

20061: CreateAt(FileMap: TJclCustomFileMapping; Access,Size:Cardinal;ViewOffset:Int64;Address: Pointer)<br />

20062: CreateError(const anErrCode: Integer;const asReplyMessage: string; const asErrorMessage: string)<br />

20063: CreateFmt( MciErrNo : MCIERROR; const Msg : string; const Args : array of const)<br />

20064: CreateFromId(Instance:THandle;ResId:Integer;ResType:PChar)<br />

20065: CreateLinked( DBCtrlGrid : TDBCtrlGrid)<br />

20066: CREATENEW(AOWNER:TCOMPONENT; Dummy: Integer)<br />

20067: CreateRes( Ident : Integer);<br />

20068: CreateRes( MciErrNo : MCIERROR; Ident : Integer)<br />

20069: CreateRes( ResStringRec : PResStringRec);<br />

20070: CreateResHelp( Ident : Integer; AHelpContext : Integer);<br />

20071: CreateResHelp( ResStringRec : PResStringRec; AHelpContext : Integer);<br />

20072: CreateShadow( AOwner : TComponent; ControlSide : TControlSide)<br />

20073: CreateSize( AWidth, AHeight : Integer)<br />

20074: Open( const Name : string; const InheritHandle : Boolean; const DesiredAccess : Cardinal)<br />

20075:<br />

20076: -------------------------------------------------------------------------------<br />

20077: unit uPSI_MathMax;<br />

20078: -------------------------------------------------------------------------------<br />

20079: CONSTS<br />

20<strong>08</strong>0: Bernstein: Float = 0.2801694990238691330364364912307; // Bernstein constant<br />

20<strong>08</strong>1: Cbrt2: Float = 1.2599210498948731647672106072782; // CubeRoot(2)<br />

20<strong>08</strong>2: Cbrt3: Float = 1.4422495703074<strong>08</strong>3823216383107801; // CubeRoot(3)<br />

20<strong>08</strong>3: Cbrt10: Float = 2.15443469003188<strong>37</strong>2<strong>17</strong>592935665194; // CubeRoot(10)<br />

20<strong>08</strong>4: Cbrt100: Float = 4.6415888336127788924100763509194; // CubeRoot(100)<br />

20<strong>08</strong>5: CbrtPi: Float = 1.464591887561523263020<strong>14</strong>25272638; // CubeRoot(PI)<br />

20<strong>08</strong>6: Catalan: Float = 0.915965594<strong>17</strong>7219015<strong>05</strong>46035<strong>14</strong>9324; // Catalan constant<br />

20<strong>08</strong>7: PiJ: Float = 3.<strong>14</strong>15926535897932384626433832795; // PI<br />

20<strong>08</strong>8: PI: Extended = 3.<strong>14</strong>15926535897932384626433832795);<br />

20<strong>08</strong>9: PiOn2: Float = 1.5707963267948966192313216916398; // PI / 2<br />

20090: PiOn3: Float = 1.0471975511965977461542<strong>14</strong>4610932; // PI / 3<br />

20091: PiOn4: Float = 0.78539816339744830961566<strong>08</strong>4581988; // PI / 4<br />

20092: Sqrt2: Float = 1.4<strong>14</strong>213562<strong>37</strong>30950488016887242097; // Sqrt(2)<br />

20093: Sqrt3: Float = 1.732<strong>05</strong><strong>08</strong>075688772935274463415<strong>05</strong>9; // Sqrt(3)<br />

20094: Sqrt5: Float = 2.236067977499789696409<strong>17</strong>36687313; // Sqrt(5)<br />

20095: Sqrt10: Float = 3.162277660168<strong>37</strong>93319988935444327; // Sqrt(10)<br />

20096: SqrtPi: Float = 1.7724538509<strong>05</strong>5160272981674833411; // Sqrt(PI)<br />

20097: Sqrt2Pi: Float = 2.50662827463100<strong>05</strong>02415765284811; // Sqrt(2 * PI)<br />

20098: TwoPi: Float = 6.283185307<strong>17</strong>9586476925286766559; // 2 * PI<br />

20099: ThreePi: Float = 9.424777960769<strong>37</strong>9715387930<strong>14</strong>98385; // 3 * PI<br />

20100: Ln2: Float = 0.693<strong>14</strong>718<strong>05</strong>599453094<strong>17</strong>23212<strong>14</strong>5818; // Ln(2)<br />

20101: Ln10: Float = 2.3025850929940456840<strong>17</strong>99<strong>14</strong>546844; // Ln(10)<br />

20102: LnPi: Float = 1.<strong>14</strong>4729885849400<strong>17</strong>4<strong>14</strong>34273513531; // Ln(PI)<br />

20103: Log2J: Float = 0.30102999566398119521<strong>37</strong>3889472449; // Log10(2)<br />

20104: Log3: Float = 0.4771212547196624<strong>37</strong>29502790325512; // Log10(3)<br />

201<strong>05</strong>: LogPi: Float = 0.497<strong>14</strong>98726941338543512682882909; // Log10(PI)<br />

20106: LogE: Float = 0.43429448190325182765112891891661; // Log10(E)<br />

20107: E: Float = 2.7182818284590452353602874713527; // Natural constant<br />

201<strong>08</strong>: hLn2Pi: Float = 0.91893853320467274<strong>17</strong>803297364<strong>05</strong>62; // Ln(2*PI)/2<br />

20109: inv2Pi: Float = 0.15915494309189533576888<strong>37</strong>63<strong>37</strong>25<strong>14</strong>36203445964574046; // 0.5/Pi<br />

20110: TwoToPower63: Float = 9223<strong>37</strong>20368547758<strong>08</strong>.0; // 2^63<br />

20111: GoldenMean: Float = 1.618033988749894848204586834365638; // GoldenMean<br />

20112: EulerMascheroni: Float = 0.577215664901532860606512090<strong>08</strong>24; // Euler G<strong>AM</strong>MA<br />

20113: RadCor : Double = 57.295779513<strong>08</strong>232; {number of degrees in a radian}<br />

201<strong>14</strong>: StDelta : Extended = 0.00001; {delta for difference equations}<br />

20115: StEpsilon : Extended = 0.00001; {epsilon for difference equations}<br />

20116: StMaxIterations : Integer = 100; {max attempts for convergence}<br />

201<strong>17</strong>:<br />

20118: procedure SIRegister_StdConvs(CL: TPSPascalCompiler);<br />

20119: begin<br />

20120: MetersPerInch = 0.0254; // [1]<br />

20121: MetersPerFoot = MetersPerInch * 12;<br />

20122: MetersPerYard = MetersPerFoot * 3;<br />

20123: MetersPerMile = MetersPerFoot * 5280;<br />

20124: MetersPerNauticalMiles = 1852;<br />

20125: MetersPerAstronomicalUnit = 1.49598E11; // [4]<br />

20126: MetersPerLightSecond = 2.99792458E8; // [5]<br />

20127: MetersPerLightYear = MetersPerLightSecond * 31556925.9747; // [7]<br />

20128: MetersPerParsec = MetersPerAstronomicalUnit * 206264.806247096; // 60 * 60 * (180 / Pi)<br />

20129: MetersPerCubit = 0.4572; // [6][7]<br />

20130: MetersPerFathom = MetersPerFoot * 6;<br />

20131: MetersPerFurlong = MetersPerYard * 220;<br />

20132: MetersPerHand = MetersPerInch * 4;<br />

20133: MetersPerPace = MetersPerInch * 30;<br />

20134: MetersPerRod = MetersPerFoot * 16.5;<br />

20135: MetersPerChain = MetersPerRod * 4;<br />

20136: MetersPerLink = MetersPerChain / 100;<br />

201<strong>37</strong>: MetersPerPoint = MetersPerInch * 0.0138<strong>37</strong>; // [7]<br />

20138: MetersPerPica = MetersPerPoint * 12;<br />

20139:<br />

20<strong>14</strong>0: SquareMetersPerSquareInch = MetersPerInch * MetersPerInch;<br />

20<strong>14</strong>1: SquareMetersPerSquareFoot = MetersPerFoot * MetersPerFoot;<br />

PC<strong>08</strong> E:\maxbox3\mXGit39988\maxbox3\docs\maxbox_extract_funclist399.txt<br />

http://www.softwareschule.ch/maxbox.htm T: 297<br />

p: 234

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!