lemmonTheorem = [st|
[1]       ExAy(Kxy -> Fxy) P
[2]       AxEy(Kxy)        P
[1,3]     Ay(Kay -> Fay)   (1)a EII
[2]       Ey(Kay)          (2) UI
[2,5]     Kab              (4)b EII
[1,3]     Kab -> Fab       (3) UI
[1,2,3,5] Fab              (5) (6) TF
[1,2,3,5] EyFay            (7) EG
[1,2,3,5] ExEyFxy          (8) EG
[1,2,3]   ExEyFxy          [5](9) EIE
[1,2]     ExEyFxy          [3](10) EIE|]
lemmonTheorem = [st|
[1]       ExAy(Kxy -> Fxy) P
[2]       AxEy(Kxy)        P
[1,3]     Ay(Kay -> Fay)   (1)a EII
[2]       Ey(Kay)          (2) UI
[2,5]     Kab              (4)b EII
[1,3]     Kab -> Fab       (3) UI
[1,2,3,5] Fab              (5) (6) TF
[1,2,3,5] EyFay            (7) EG
[1,2,3,5] ExEyFxy          (8) EG
[1,2,3]   ExEyFxy          [5](9) EIE
[1,2]     ExEyFxy          [3](10) EIE|]
lemmonTheorem = [st|
[1]       ExAy(Kxy -> Fxy) P
[2]       AxEy(Kxy)        P
[1,3]     Ay(Kay -> Fay)   (1)a EII
[2]       Ey(Kay)          (2) UI
[2,5]     Kab              (4)b EII
[1,3]     Kab -> Fab       (3) UI
[1,2,3,5] Fab              (5) (6) TF
[1,2,3,5] EyFay            (7) EG
[1,2,3,5] ExEyFxy          (8) EG
[1,2,3]   ExEyFxy          [5](9) EIE
[1,2]     ExEyFxy          [3](10) EIE|]