map{
  $a=1-$_/10;
  map{
    $d=$a;
    $e=$b=$_/20-2;
    for(1..99){
      ($d,$e)=(2*$d*$e+$a,$e**2-$d**2+$b);
      $c=$d**2+$e**2>4?_:0;
      last if $c eq _
    }
    print$c
  }0..59;
  print$/
}0..20;