apply_reverse_effect Subroutine

public subroutine apply_reverse_effect(tape, track, t1, t2)

Copy the samples at the same t1 but in reverse order:

Arguments

Type IntentOptional Attributes Name
type(tape_recorder), intent(inout) :: tape
integer, intent(in) :: track
real(kind=wp), intent(in) :: t1
real(kind=wp), intent(in) :: t2

Called by

proc~~apply_reverse_effect~~CalledByGraph proc~apply_reverse_effect apply_reverse_effect program~shepard_scale shepard_scale program~shepard_scale->proc~apply_reverse_effect