ibase=16;scale=0 i=r=p=1 for(c=16BDB2DBF70501169CEB75BBF59454C5ED8B613543CEBA9CA8519F37248D5EBFF9E0C2A234CF3F7052BF0E93BBB12E7D1BA0CABAE9E9;c;p*=i*i){if(p%++i){r*=i^(c%A);c/=A}} r