main $temp $g $l $v $temp $g condexp ou inf $temp 0 egal $temp 0 1 0 $l condexp et inf $temp 100 inf 0 $temp 1 0 $v condexp et non $g non $l 1 0 $g $l $v