Program 3b added