metamath/valid/imo-1984-p2.mm (13 lines of code) (raw):
$(
@{
imo-1984-p2.0 @e |- ( ph -> A e. NN ) $@
imo-1984-p2.1 @e |- ( ph -> B e. NN ) $@
imo-1984-p2.2 @e |- ( ph -> -. 7 || A ) $@
imo-1984-p2.3 @e |- ( ph -> -. 7 || B ) $@
imo-1984-p2.4 @e |- ( ph -> -. 7 || ( A + B ) ) $@
imo-1984-p2.5 @e |- ( ph -> ( 7 ^ 7 ) || ( ( ( ( A + B ) ^ 7 ) - ( A ^ 7 ) ) - ( B ^ 7 ) ) ) $@
@( (Contributed by Kunhao Zheng, 9-Aug-2021.) @)
imo-1984-p2 @p |- ( ph -> ; 1 9 <_ ( A + B ) ) @=
? @.
@}
$)