1, modified mp.f90 added; 2, assignment of nksqtotf corrected