let v0 = 0
let v1 = 1
let v2 = 1 + 1 — 1 * 1 / 1
let v3 = [ 0… 100 ]
let v4 = [ for i in 0… 100 -> ( i * i ) ]
let mutable v5 = 1
v5 <- v5 + 1
v5 <- v5 — 1
А вообще дальше лень описывать, если проще я изучил %7 исходного кода учебника, вот
Это 1 % но вот просто для размышлений, это условный оператор который реализует логику везде.
open System
open Microsoft
module Conditional_Operator =
let x = 1
let y = 1
let func1 =
if ( x = y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
if ( x <> y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
if ( x > y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
if ( x < y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
По сути самый сложнейший код будет построен на таком условии. Посмотрите, можно копировать в блокнот исходник. только здесь приведены ветви, которые выполняют 4 условия, но методов может быть в разы больше, но отдельное понимание метода будет схожим.
В следующем посте я подробно опишу
open System
open Microsoft
module Conditional_Operator =
let x = 1
let y = 1
let func1 =
if ( x = y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
if ( x <> y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
if ( x > y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
if ( x < y ) then
printfn «Условие выполнено»
else
printfn «Условие не выполнено»
let v0 = 0
let v1 = 1
let v2 = 1 + 1 — 1 * 1 / 1
let v3 = [ 0… 100 ]
let v4 = [ for i in 0… 100 -> ( i * i ) ]
let mutable v5 = 1
v5 <- v5 + 1
v5 <- v5 — 1
А можно попросить хотя бы названия постам давать такие, чтобы по ним хотя бы приблизительно можно было понять о чем речь?
Тем более, что это требуется правилами.
Ну и здравый смысл подсказывает…
Но я больше предпочитаю геометродинамику.