$/=$";($a,$b,$c,$d)=<>;
$e=$a*$c-$b*$b;
$f=($a*$d-$b*$c)/$e;
$g=($b*$d-$c*$c)/$e;
print$f*$f-$g*4<0?I:R