Breaking up into real & im spaces now compiles
New routine to break up complex schmidt pert of response vector. Prob not needed.