ad_proc -public between {num r1 r2 {includeEdges 0}} { return 1 if num between r1 and r2 } { if {$includeEdges} { return [expr {$num>=$r1 && $num<=$r2}] } else { return [expr {$num>$r1 && $num<$r2}] } }