Create pseudopotential.f90