MPH_exe_id - find executable id given component name

This function returns the executable id given component name.

REVISION HISTORY:

       2001-Dec-13 -- use optional argument
       2001-Nov-15 -- add PROTEX convention
       2001-May-20 -- first prototype

INTERFACE:

       integer function MPH_exe_id (cname)

USES:

       implicit none

SEE ALSO:

       MPH_find_name

INPUT PARAMETERS:

       character(len=*), intent(in), optional :: cname   ! component name

OUTPUT PARAMETERS:

       ! exe_ids (id)
 
   !LOCAL PARAMETERS:
       integer :: id, comm

\