jack128

type
  TArray2 = class
  strict private    
    class procedure SwapIfGreater<T>(var Values: array of T; const Comparer: IComparer<T>; A, B: Integer); static;
  public
    class procedure QuickSortFix<T>(var Values: array of T; const Comparer: IComparer<T>; L, R: Integer); static;    
  end;

class procedure TArray2.SwapIfGreater<T>(var Values: array of T; const Comparer: IComparer<T>; A, B: Integer);
var

jack128

program Project2;

{$APPTYPE CONSOLE}

{$R *.res}

{$define UseGenericList}

uses
  WinApi.Windows, System.SysUtils, System.Classes, System.Generics.Collections;

jack128

using System
using DevExpress.Mvvm.UI
using DevExpress.Xpf.Grid

alias DonglesGridControl() {
    GridControl { 
        ItemsSource: bind "DongleSellings1"

        View: TableView {
            CellStyle: Style {

jack128

using System;
using System.Collections.Generic;
using System.Linq;
using System.Reactive;
using System.Reactive.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Input;

jack128

using System
using System.Windows.Input
using CertMaker
using CertMaker.Wpf
using DevExpress.Mvvm.UI
using DevExpress.Xpf.Core
//using DevExpress.Xpf.Editors
using DevExpress.Xpf.Grid

alias TemplateBinding(property) {

jack128

        public static IDisposable SubscribeWeakly<T>(this IObservable<T> obs, Action<T> onNext)
        {
                // unfortunately it's not working...
            return SubscribeWeakly(obs, Observer.Create(onNext));
        }

        public static IDisposable SubscribeWeakly<T>(this IObservable<T> obs, IObserver<T> observer)
        {
            var weak = new WeakReference<IObserver<T>>(observer);
            var result = Disposable.Empty;

jack128

function itg (x) { return x*x; }
 

var vp = 50000;
  var np = 0;
  var snp = np;
  var step = 0.0001;
  var sum = 0;
  console.log('Integral calculations...');
  var cnt1 = Date.now();