Shipping costs for Groups and Fields: A Programmed Unit in Modern Mathematics