------------------------------------------------------------------------------
Purpose: Computes the projection of a WF onto one mode, i.e.: ,
         where P=|phi>