c***  the dimension of the state, the number of obs,
c***  the number of ensemble members, and the number of ics
	parameter(nx=10)
	parameter(ny=5)
	parameter(nz=5)
	parameter(n=nx*ny*nz)
	parameter(mobs=n) 
	parameter(nens=512)
	parameter(ics=32)