removed fortran and working storage