f77 -O3  -fno-automatic -o DIRDIF dirdif.f
