MPH_debug - define debug level

This routine defines the debug level. The higher the level is, the more debug information the code will display.

REVISION HISTORY:

       2001-Nov-15 -- add PROTEX convention
       2001-May-20 -- first prototype

INTERFACE:

       subroutine MPH_debug (level)

USES:

       implicit none

INPUT PARAMETERS:

       integer, intent(in) :: level  !  0 (default), 1 or 2

\