vault backup: 2023-10-25 17:36:33
This commit is contained in:
parent
3486bf7f0f
commit
c5a1ad6716
@ -45,4 +45,4 @@ val for_all: ('a -> bool) -> 'a list -> bool = <fun>
|
|||||||
# let rec exists p = function
|
# let rec exists p = function
|
||||||
| [] -> true
|
| [] -> true
|
||||||
| e::t -> p e || for_all p t;;
|
| e::t -> p e || for_all p t;;
|
||||||
val exists
|
val exists: ('a -> bool) -> 'a list -> bool = <fun>
|
||||||
|
Loading…
x
Reference in New Issue
Block a user