Bering Sea Pacific cod move north as survey sees fewer fish in east