ifort -c inputdata.f90
ifort -c param.f90
ifort -c prmt.f90
ifort -c drag3.F 
ifort -c DRAG.F
ifort -o drag.exe DRAG.o drag3.o inputdata.o param.o prmt.o