let
valid_pointer :
D
.pointer
->
D
.
F
.pred =
D
.p_app1 (
"m0_valid_pointer"
)