k
p:{:[~x!2;:2_&{&/x!'2_!x}'!:x;1;x,:2_&{&/x!'2_!x}'!:x;]} {*/_(p x)^_(_log x)%_log p x} 20 232792560