f::[(String,String,Int)] ->(Int ->Bool) ->[(String,String,Int)]
f list function = filter(\(_,_,medie) -> function  medie) list