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

Otherwise, very fast routines are simply not printed

ftimings/ftimings_node.F90

@@ -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)