merged with pascal