Create sort.f