fof(axiom_K,axiom, ( axiom_K <=> ! [X,Y] : is_a_theorem(implies(necessarily(implies(X,Y)), implies(necessarily(X),necessarily(Y)))) )).