module m_arrays

use m_parameters

implicit none

real*8, allocatable, dimension(:,:,:) :: u,v,w,y

contains

subroutine m_arrays_init

integer :: ierr


end subroutine m_arrays_init


subroutine m_arrays_finalize


end subroutine m_arrays_finalize


subroutine m_arrays_calculate_instant

integer :: i,j,k

end subroutine m_arrays_calculate_instant


end module m_arrays