#!/usr/bin/env perl

use strict;
use utf8;
use warnings;

my$c=0;
for (1...3) {
  my$x=<>;
  if($x=~/^R/){
    $c++;
  }
}
print ($c<2?"BLUE":"RED");