Create LEUSO.f90