Commit 71b55084 authored by Miriam Hinzen's avatar Miriam Hinzen

Update VYukawaFilm.f90

parent 960110d3
......@@ -101,8 +101,6 @@ module m_VYukawaFilm
real :: ga(vacuum%nmzd), gb(vacuum%nmzd)
real :: delta(vacuum%nmzd,2), epsilon(vacuum%nmzd,2), zeta(vacuum%nmzd)
intrinsic aimag, cmplx, conjg, exp, real, mod
! definitions / initialisations:
do iz = 1, vacuum%nmz
......@@ -239,8 +237,6 @@ module m_VYukawaFilm
real :: z(3*stars%mx3)
real :: g_damped(stars%ng2), vcons2(stars%ng2)
intrinsic abs, cmplx, conjg, cos, exp, sin, sqrt
! definitions / initialisations
ifft = 3 * stars%mx3
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment