mod_suydam.f90

Go to the documentation of this file.

module mod_suydam

  use itm_types

  implicit none
 
  real(r8), allocatable :: cp0(:), cp1(:), cp2(:), cq0(:), cq1(:)
  real(r8), allocatable :: b02(:), dt_b02(:), ds_b02(:)

  real(r8) :: qaxis

  integer(itm_i4) :: ncpq

end module mod_suydam