Lines Matching refs:f
79 let rec iter f tree =
81 f node.Node.key node.Node.value;
82 iter f node.Node.children
86 let rec map f tree =
91 | Some value -> f value
93 { node with Node.value = value; Node.children = map f node.Node.children }
97 let rec fold f tree acc =
99 fold f node.Node.children (f node.Node.key node.Node.value accu)
134 let rec iter_path f tree = function
140 f node.Node.key node.Node.value;
141 iter_path f node.Node.children l