let p be Element of HP-WFF ; :: thesis: ( p . 1 = 1 implies p is conditional )
assume A1: p . 1 = 1 ; :: thesis: p is conditional
per cases ( p is conjunctive or p is conditional or p is simple or p = VERUM ) by Th9;
end;