<>;$_[$`][$']=$_[$'][$`]=/ /for<>;
for$i(@a=0..49){for$j(@a){for$k(@a){for$l(@a){
	$x+=
		$i!=$j&&$i!=$k&&$i!=$l&&
		$j!=$k&&$j!=$l&&$k!=$l&&
		$_[$i][$j]&&$_[$j][$k]&&
		$_[$k][$l]&&$_[$l][$i]&&
		!$_[$i][$k]&&!$_[$j][$l]
}}}}
print$x/8