SyMind / learning

路漫漫其修远兮,吾将上下而求索。
9 stars 1 forks source link

TypeScript 类型系统是图灵完备的 #41

Open SyMind opened 2 years ago

SyMind commented 2 years ago

出处:https://github.com/microsoft/TypeScript/issues/14833

这不是一个 bug 反馈,我当然不希望 TypeScript 类型系统因为这条 issue 而受到限制。但是,我注意到当前版本(2.2 版)的类型系统是图灵完备的。

通过映射类型、递归类型定义、索引访问成员类型以及可以创建任意数量的类型,来实现图灵完备。

TrueExprFalseExprTest 定义为适合的类型,如下的实现将具备图灵完备性:

type MyFunc<TArg> = {
  "true": TrueExpr<MyFunction, TArg>,
  "false": FalseExpr<MyFunc, TArg>
}[Test<MyFunc, TArg>];

即使我没有正式证明(编辑:与此同时,我确实 - 见下文)提到的设备使 TypeScript 图灵完整,但通过查看以下测试给定类型是否表示素数的代码示例应该很明显数字: Even though I didn't formally prove (edit: in the meantime, I did - see below) that the mentioned device makes TypeScript turing complete, it should be obvious by looking at the following code example that tests whether a given type represents a prime number:

type StringBool = "true"|"false";

interface AnyNumber { prev?: any, isZero: StringBool }; interface PositiveNumber { prev: any, isZero: "false" };

type IsZero = TNumber["isZero"]; type Next = { prev: TNumber, isZero: "false" }; type Prev = TNumber["prev"];

type Add<T1 extends AnyNumber, T2> = { "true": T2, "false": Next<Add<Prev, T2>> }[IsZero];

// Computes T1 * T2 type Mult<T1 extends AnyNumber, T2 extends AnyNumber> = MultAcc<T1, T2, _0>; type MultAcc<T1 extends AnyNumber, T2, TAcc extends AnyNumber> = { "true": TAcc, "false": MultAcc<Prev, T2, Add<TAcc, T2>> }[IsZero];

// Computes max(T1 - T2, 0). type Subt<T1 extends AnyNumber, T2 extends AnyNumber> = { "true": T1, "false": Subt<Prev, Prev> }[IsZero];

interface SubtResult<TIsOverflow extends StringBool, TResult extends AnyNumber> { isOverflowing: TIsOverflow; result: TResult; }

// Returns a SubtResult that has the result of max(T1 - T2, 0) and indicates whether there was an overflow (T2 > T1). type SafeSubt<T1 extends AnyNumber, T2 extends AnyNumber> = { "true": SubtResult<"false", T1>, "false": { "true": SubtResult<"true", T1>, "false": SafeSubt<Prev, Prev> }[IsZero] }[IsZero];

type _0 = { isZero: "true" }; type _1 = Next<_0>; type _2 = Next<_1>; type _3 = Next<_2>; type _4 = Next<_3>; type _5 = Next<_4>; type _6 = Next<_5>; type _7 = Next<_6>; type _8 = Next<_7>; type _9 = Next<_8>;

type Digits = { 0: _0, 1: _1, 2: _2, 3: _3, 4: _4, 5: _5, 6: _6, 7: _7, 8: _8, 9: _9 }; type Digit = 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9; type NumberToType = Digits[TNumber]; // I don't know why typescript complains here.

type _10 = Next<_9>; type _100 = Mult<_10, _10>;

type Dec2<T2 extends Digit, T1 extends Digit> = Add<Mult<_10, NumberToType>, NumberToType>;

function forceEquality<T1, T2 extends T1>() {} function forceTrue<T extends "true">() { }

//forceTrue<Equals< Dec2<0,3>, Subt<Mult<Dec2<2,0>, _3>, Dec2<5,7>> >>(); //forceTrue<Equals< Dec2<0,2>, Subt<Mult<Dec2<2,0>, _3>, Dec2<5,7>> >>();

type Mod<TNumber extends AnyNumber, TModNumber extends AnyNumber> = { "true": _0, "false": Mod2<TNumber, TModNumber, SafeSubt<TNumber, TModNumber>> }[IsZero]; type Mod2<TNumber extends AnyNumber, TModNumber extends AnyNumber, TSubtResult extends SubtResult<any, any>> = { "true": TNumber, "false": Mod<TSubtResult["result"], TModNumber> }[TSubtResult["isOverflowing"]];

type Equals<TNumber1 extends AnyNumber, TNumber2 extends AnyNumber> = Equals2<TNumber1, TNumber2, SafeSubt<TNumber1, TNumber2>>; type Equals2<TNumber1 extends AnyNumber, TNumber2 extends AnyNumber, TSubtResult extends SubtResult<any, any>> = { "true": "false", "false": IsZero<TSubtResult["result"]> }[TSubtResult["isOverflowing"]];

type IsPrime = IsPrimeAcc<TNumber, _2, Prev<Prev>>;

type IsPrimeAcc<TNumber, TCurrentDivisor, TCounter extends AnyNumber> = { "false": { "true": "false", "false": IsPrimeAcc<TNumber, Next, Prev> }[IsZero<Mod<TNumber, TCurrentDivisor>>], "true": "true" }[IsZero];

forceTrue< IsPrime<Dec2<1,0>> >(); forceTrue< IsPrime<Dec2<1,1>> >(); forceTrue< IsPrime<Dec2<1,2>> >(); forceTrue< IsPrime<Dec2<1,3>> >(); forceTrue< IsPrime<Dec2<1,4>>>(); forceTrue< IsPrime<Dec2<1,5>> >(); forceTrue< IsPrime<Dec2<1,6>> >(); forceTrue< IsPrime<Dec2<1,7>> >(); Besides (and a necessary consequence of being turing complete), it is possible to create an endless recursion:

type Foo<T extends "true", B> = { "true": Foo<T, Foo<T, B>> }[T]; let f: Foo<"true", {}> = null!; Turing completeness could be disabled, if it is checked that a type cannot use itself in its definition (or in a definition of an referenced type) in any way, not just directly as it is tested currently. This would make recursion impossible.

//edit: A proof of its turing completeness can be found here