Modus Poens correct with dependent types. :)