A simple Perl script (using Math::BigInt) confirms that the product of the two factors exhibited is indeed RSA200 as shown. I can not at this time confirm the two factors are prime, but I would trust RSA to have verified that before the original challenge.
use strict;
use warnings;
use Math::BigInt;
my $rsa200="27997833911221327870829467638722601621070446786955428537560009929326128400107609345671052955360856061822351910951365788637105954482006576775098580557613579098734950144178863178946295187237869221823983";
# (200 digits, checksum = 213598)
my $product="27_997_833_911_221_327_870_829_467_638_722_601_621_070_446_786_955_428_537_560_009_929_326_128_400_107_609_345_671_052_955_360_856_061_822_351_910_951_365_788_637_105_954_482_006_576_775_098_580_557_613_579_098_734_950_144_178_863_178_946_295_187_237_869_221_823_983";
my $x="3_532_461_934_402_770_121_272_604_978_198_464_368_671_197_400_197_625_023_649_303_468_776_121_253_679_423_200_058_547_956_528_088_349";
my $y="7_925_869_954_478_333_033_347_085_841_480_059_687_737_975_857_364_219_960_734_330_341_455_767_872_818_152_135_381_409_304_740_185_467";
$product=Math::BigInt->new($product);
$x= Math::BigInt->new($x);
$y= Math::BigInt->new($y);
my $xy= $x->copy()->bmul($y);
my $cmp= $product->bcmp($xy);
print "Equal\n" unless $cmp;
print "Equal rsa200 = product" unless Math::BigInt->new($rsa200)->bcmp($product);
The Announcement of the new factoring record was posted on a mailing list, archived in France on a records page now mirrored at the Factoring Records Homepage as RSA200.
I cited the above in comment to the WikiNews discussion of the story Two hundred digit number factored-- which they are apparently first outside the Factory community to carry. (Slashdot got it from WikiNews.)
(I used an independent copy of the RSA200 number to verify authenticity.)
IAAAM,
Bill / N1VUX
I am an Apostate mathematician ...
I work went over to the darkside of *Software*
