Посоветуйте лучший вариант: ниже функция поворачивающая бинарное дерево слева направо.

Question

Посоветуйте лучший вариант: ниже функция поворачивающая бинарное дерево слева направо.

Всё работает, но количество option поражает воображение для столь малого кода. Как правильно реализоваввать nullable мемберы?
type TreeNode =
new(v:int, l:option<TreeNode>, r:option<TreeNode>) =
{value = v; left = l; right = r;}
val value: int
val left: option<TreeNode>
val right: option<TreeNode>

let rec reverse (tree: option<TreeNode>) : option<TreeNode> =
if tree = None then None
else Some(TreeNode(tree.Value.value, reverse(tree.Value.right), reverse(tree.Value.left)))

#fsharp #programming #russian

0

25.03.2019

3 ответов

16 просмотров

Klei

Не надо определять функцию от единственного option параметра без особой необходимости.

0

25.03.2019

Ayrat Hudaygulov

type Tree<'a> = | Empty | Node of 'a * Tree<'a> * Tree<'a> let rec reverse = function | Empty -> Empty | Node(value, left, right) -> Node (value, reverse right, reverse left)

0

25.03.2019

Ayrat Hudaygulov · Accepted Answer

Ayrat Hudaygulov

можно их не писать для начала :D

0

25.03.2019

169 похожих чатов

Посоветуйте лучший вариант: ниже функция поворачивающая бинарное дерево слева направо.

3 ответов

Похожие вопросы