Skip to content
Permalink
master
Switch branches/tags
Go to file
 
 
Cannot retrieve contributors at this time
module params
implicit none
! Time step length
real(8), parameter :: dt = 0.005_8
! State vector properties
integer, parameter :: nx = 10
integer, parameter :: ny = 10
integer, parameter :: n = nx+nx*ny
! Model parameters
real(8), parameter :: f = 20.0_8
real(8), parameter :: h = 1.0_8
real(8), parameter :: c = 10.0_8
real(8), parameter :: b = 10.0_8
end module params