Saving before attempting to implement derived type. You'll need to uncomment some things to make it work again (in main)