¿Cuál es la forma correcta de demostrar la siguiente declaración lógica proposicional utilizando la correspondencia Curry-Howard?
Estoy estudiando la correspondencia Curry-Howard. Dada la declaración de lógica proposicional: (¬p -> q) -> ((¬p -> ¬q) -> p). Necesito definir un tipo (como proposición) y una función (como una prueba) en OCaml. Se me ocurrió el siguiente código y me quedé atascado: type empty = | ;; let . . . Read more