real_time_type Derived Type

    type real_time_type
        ! and a end time to stop the simulation afterwards
        real(dp) :: max_time = -1.0_dp

        ! later also store the type of operators and spinorbitals in this
        ! type!

        ! store the type of the greensfunction calculated
        !  1 ... greater GF: creation operator applied!
        ! -1 ... lesser GF: annihilation operator applied!
        integer :: gf_type = 0

        ! to reduce the explosive spread of walkers through the
        ! Hilbert space a small imaginery energy can be introduced in
        ! the Schroedinger equation id/dt y(t) = (H-E0-ie)y(t)
        real(dp) :: damping = 0.0_dp
        real(dp) :: time_angle = 0.0_dp
        real(dp) :: quad_damp_fac = 0.0_dp

    end type real_time_type