MODULE comhdiff_mod
IMPLICIT NONE  
#include "dimensions.h"
#include "paramet.h"

  LOGICAL alpha_var,slab_upstream
  REAL zmasqu(ip1jmp1),zmasqv(ip1jm),	&
	unsfv(ip1jm),unsev(ip1jm),unsfu(ip1jmp1),unseu(ip1jmp1)

END MODULE comhdiff_mod