! $Id$ module Cdata integer, parameter :: nx=32,ny=nx,nz=nx,mvar=3 integer, parameter :: mx=nx+6 integer, parameter :: my=ny+6 integer, parameter :: mz=nz+6 endmodule Cdata