Commit 3d828456 authored by Lorenz Huedepohl's avatar Lorenz Huedepohl
Browse files

A default threshold of > 0 is not wise, use >= 0

Otherwise, very fast routines are simply not printed
parent 9d9387fc
......@@ -336,7 +336,7 @@ module ftimings_node
node => self%firstChild
do while (associated(node))
node_value = node%get_value()
if (node_value%micros * 1e-6_rk > threshold_act &
if (node_value%micros * 1e-6_rk >= threshold_act &
.or. associated(node, threshold_node) &
.or. associated(node, own_node)) then
call node%print_graph(indent_level + 1, threshold, is_sorted, cur_value, unit_act)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment