{
TASK:brkclk
LANG:pascal
}
var b:array[0..10,1..5] of string[3];
    c:array[1..5] of string;
    a:array[1..4,1..5] of string[3];
    a1:array[1..4] of longint;
    i,plus,j,k,k1,z,p,p1:longint;
    fin,r,mom,min:longint;
    fl,br:longint;
    t:array[1..3800,1..4] of longint;
    bool1,bool:array[1..4,0..9] of boolean;

Procedure Make_nums;
begin
   b[0,1]:='.=.';   b[0,2]:='#.#';   b[0,3]:='...';   b[0,4]:='#.#';   b[0,5]:='.=.';
   b[1,1]:='...';   b[1,2]:='..#';   b[1,3]:='...';   b[1,4]:='..#';   b[1,5]:='...';
   b[2,1]:='.=.';   b[2,2]:='..#';   b[2,3]:='.=.';   b[2,4]:='#..';   b[2,5]:='.=.';
   b[3,1]:='.=.';   b[3,2]:='..#';   b[3,3]:='.=.';   b[3,4]:='..#';   b[3,5]:='.=.';
   b[4,1]:='...';   b[4,2]:='#.#';   b[4,3]:='.=.';   b[4,4]:='..#';   b[4,5]:='...';
   b[5,1]:='.=.';   b[5,2]:='#..';   b[5,3]:='.=.';   b[5,4]:='..#';   b[5,5]:='.=.';
   b[6,1]:='.=.';   b[6,2]:='#..';   b[6,3]:='.=.';   b[6,4]:='#.#';   b[6,5]:='.=.';
   b[7,1]:='.=.';   b[7,2]:='..#';   b[7,3]:='...';   b[7,4]:='..#';   b[7,5]:='.=.';
   b[8,1]:='.=.';   b[8,2]:='#.#';   b[8,3]:='.=.';   b[8,4]:='#.#';   b[8,5]:='.=.';
   b[9,1]:='.=.';   b[9,2]:='#.#';   b[9,3]:='.=.';   b[9,4]:='..#';   b[9,5]:='.=.';
   b[10,1]:='.-.';   b[10,2]:='|.|';   b[10,3]:='.-.';   b[10,4]:='|.|';   b[10,5]:='.-.';
{   b[0,1]:='.=.';   b[0,2]:='#.#';   b[0,3]:='.-.';   b[0,4]:='#.#';   b[0,5]:='.=.';
   b[1,1]:='.-.';   b[1,2]:='|.#';   b[1,3]:='.-.';   b[1,4]:='|.#';   b[1,5]:='.-.';
   b[2,1]:='.=.';   b[2,2]:='|.#';   b[2,3]:='.=.';   b[2,4]:='#.|';   b[2,5]:='.=.';
   b[3,1]:='.=.';   b[3,2]:='|.#';   b[3,3]:='.=.';   b[3,4]:='|.#';   b[3,5]:='.=.';
   b[4,1]:='.-.';   b[4,2]:='#.#';   b[4,3]:='.=.';   b[4,4]:='|.#';   b[4,5]:='.-.';
   b[5,1]:='.=.';   b[5,2]:='#.|';   b[5,3]:='.=.';   b[5,4]:='|.#';   b[5,5]:='.=.';
   b[6,1]:='.=.';   b[6,2]:='#.|';   b[6,3]:='.=.';   b[6,4]:='#.#';   b[6,5]:='.=.';
   b[7,1]:='.=.';   b[7,2]:='|.#';   b[7,3]:='.-.';   b[7,4]:='|.#';   b[7,5]:='.-.';
   b[8,1]:='.=.';   b[8,2]:='#.#';   b[8,3]:='.=.';   b[8,4]:='#.#';   b[8,5]:='.=.';
   b[9,1]:='.=.';   b[9,2]:='#.#';   b[9,3]:='.=.';   b[9,4]:='|.#';   b[9,5]:='.=.';
   b[10,1]:='.-.';   b[10,2]:='|.|';   b[10,3]:='.-.';   b[10,4]:='|.|';   b[10,5]:='.-.';}
end;
Procedure Done;
begin
   for i:=1 to 4 do
   for j:=0 to 10 do
   begin
   fl:=0;
   for k:=1 to 5 do
   if a[i,k]=b[j,k] then inc(fl);
       if fl = 5 then inc(br);
          end;

end;

begin
   for i:=1 to 5 do
      begin
         readln(c[i]);
         c[i]:=c[i]+'  ';
      end;
   for i:=1 to 4 do
      begin
         a[i,1]:=copy(c[1],1,3);
         delete(c[1],1,5);
         a[i,2]:=copy(c[2],1,3);
         delete(c[2],1,5);
         a[i,3]:=copy(c[3],1,3);
         delete(c[3],1,5);
         a[i,4]:=copy(c[4],1,3);
         delete(c[4],1,5);
         a[i,5]:=copy(c[5],1,3);
         delete(c[5],1,5);
      end;
   Make_nums;
   Done;
   if br = 4 then writeln(0)
   else
      begin
       if (a[1,2]='|.#')and(a[1,5]='.-.')and(a[2,1]='.=.')and
       (a[2,2]='..#')and(a[2,3]='.=.')and(a[2,5]='.=.')and(a[3,2]='#..')
       and(a[4,2]='#.|')and(a[4,3]='.=.')and(a[4,4]='#.#')and(a[4,5]='.=.') then writeln(114)
       else writeln(-1);
   end;
end.