problem in spr/ypr for multiarea model

detect problem in the spr/ypr output for red snapper (multi-area) while
working on use of fleet_type(f) to restrict some calculations to true
fishing fleets