my initial changes to make it compile under current gfortran compiler