DEFINITION F_ind()
TYPE =
       P:FProp.(P Appl)(P Cast)f:F.(P f)
BODY =
Show proof