4.2.憋了这么久编程讲完了,才告诉你环境怎么安装doge

零=道=>道;

前继 = 自然数=>自然数();

后继 = 自然数=>()=>自然数;

一 = ()=>零;//1

二 = ()=>()=>零;//2

三 = ()=>()=>()=>零;//3

四 = ()=>()=>()=>()=>零;//4

五 = ()=>()=>()=>()=>()=>零;//5

真 = (选择一,选择二)=>选择一();

假 = (选择一,选择二)=>选择二();

如果 = (条件,选择一,选择二)=>条件(选择一,选择二);

非 = (条件)=>如果(条件,()=>假,()=>真);

或 = (条件一,条件二) =>

如果(条件一,()=>真,()=>如果(条件二,()=>真,()=>假));

与 = (条件一,条件二) =>

如果(条件一,()=>如果(条件二,()=>真,()=>假),()=>假);

为零=(自然数)=>自然数===零?真:假;

加 = (数一,数二) =>

如果(为零(数二)

,()=>数一

,()=>加(后继(数一),前继(数二))

);

// 减 = (数一,数二) =>

// 如果(为零(数二)

// ,()=>数一

// ,()=>减(前继(数一),前继(数二))

// );

减 = (数一,数二) =>

如果(为零(数一)

,()=>零

,()=>如果(为零(数二)

,()=>数一

,()=>减(前继(数一),前继(数二))

)

);

为一 = (自然数) => 如果(为零(自然数)

,()=>假

,()=>如果(为零(前继(自然数))

,()=>真

,()=>假)

);

乘非零 = (数一,数二) =>

如果(为一(数二)

,()=>数一

,()=>乘非零(加(数一,数一),减(数二,一))

);

乘 = (数一,数二) =>

如果(为零(数二)

,()=>零

,()=>乘非零(数一,数二)

);

相等=(数一,数二)=>如果(

与(为零(减(数一,数二)),

为零(减(数二,数一)))

,()=>真

,()=>假);

小于=(数一,数二) => 如果(

与(为零(减(数一,数二)),

非(为零(减(数二,数一))))

,()=>真

,()=>假);

大于=(数一,数二) => 如果(

与(非(为零(减(数一,数二))),

为零(减(数二,数一)))

,()=>真

,()=>假);

// 斐波那契数

// 第一个月初有一对刚诞生的兔子

// 第二个月之后（第三个月初）它们可以生育

// 每月每对可生育的兔子会诞生下一对新兔子

// 兔子永不死去

// 过了100个月,总计有多少兔子?

//1,1,2,3,5,8,13,……,斐(第88个月),斐(第89个月),斐(第88个月)+斐(第89个月),

斐波那契数 = (第几个月) =>

如果(或(为零(第几个月),为一(第几个月)),

()=>一,

()=>加(斐波那契数(减(第几个月,一))

,斐波那契数(减(第几个月,二)))

);

展现 = (自然数) =>

如果(

为零(自然数),

() => '',

() => 展现(前继(自然数)) + '壹'

);