It would help if you post complete working examples, so we won't need to fill in the gaps ourself. But hoping to get your intentions right, you could do it this way:

if {3000 - [expr [lindex $list $i 0] + 0]} {