main Program

Uses

Variables

Type Attributes Name Initial
real(kind=real64), parameter :: duration = 10.0d0
integer(kind=int32), parameter :: sampling = 4096
type(Random_) :: random
type(IO_) :: f
type(IO_) :: z
type(Math_) :: Math
integer(kind=int32) :: i
complex(kind=complex64), allocatable :: wave(:)
complex(kind=complex64), allocatable :: spectre(:)
real(kind=real64), allocatable :: omega(:)
real(kind=real64), allocatable :: t(:)
real(kind=real64) :: dt
real(kind=real64) :: set_omega