Solution to Pascal_yield