#define _RL Real*8
#define _RS Real*4

C#define MNC_DEBUG

CEH3 #define _BEGIN_MASTER(A) "do_nothing(A)"
CEH3 #define _END_MASTER(A)   "do_nothing(A)"

CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***