// File: /workspace/github_c_makefile_star2_O3/diaxen[P]fft-garden/mr_dit_dr_S_P.c
// Function: mr_dit_dr
static inline void
mr_dit_dr(const complex double * restrict in,
	      complex double * restrict out,
	      int s, int log2_N)
{
  unsigned l = 1 << (log2_N - s);
  unsigned stride = 1 << s;

  switch (l)
    {
    case 2:			/* last stage radix 2 */
      ct_dit_bf2_0(1, stride, out, in);
      break;

    case 4:			/* last stage radix 4 */
      mr_dit_bf4_0(1, stride, out, in);
      break;

    default:
      l >>= 2;
      mr_dit_dr(in,              out,         s + 2, log2_N);
      mr_dit_dr(in + stride,     out + l,     s + 2, log2_N);
      mr_dit_dr(in + stride * 2, out + 2 * l, s + 2, log2_N);
      mr_dit_dr(in + stride * 3, out + 3 * l, s + 2, log2_N);

      mr_dit_bf4_0(l, l, out, out);
      mr_dit_bf4_1(l, out + l / 2);

      for (unsigned k = 1; k < l / 2; k++)
        {
          complex double w1 = get_twiddle(k << s, log2_N);
          complex double w2 = get_twiddle(k * 2 << s, log2_N);
          complex double w3 = get_twiddle(k * 3 << s, log2_N);
          mr_dit_bf4(l, out + k, w1, w2, w3);
          mr_dit_bf4(l, out + l - k, conj(w1 * I), -conj(w2), -conj(w3 * I));
        }
    }
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xd8, %rsp
movq %rsi, %rbx
movl %ecx, 0xc(%rsp)
movl %ecx, %esi
subl %edx, %esi
movl $0x1, %r12d
movl $0x1, %eax
movl %esi, %ecx
shll %cl, %eax
movq %rdx, 0x38(%rsp)
movl %edx, %ecx
shll %cl, %r12d
movq %rdi, %r13
shlq $0x4, %r12
addq %rdi, %r12
cmpl $0x4, %eax
je 0x196a
cmpl $0x2, %eax
jne 0x1a32
movupd (%r13), %xmm1
movupd (%r12), %xmm0
movapd %xmm1, %xmm2
addpd %xmm0, %xmm2
movupd %xmm2, (%rbx)
subpd %xmm0, %xmm1
movl $0x18, %eax
movl $0x10, %ecx
jmp 0x1a16
movl $0x2, %eax
movq 0x38(%rsp), %rcx
shll %cl, %eax
movl $0x3, %edx
shll %cl, %edx
shlq $0x4, %rax
shlq $0x4, %rdx
movupd (%r13), %xmm3
movupd (%r12), %xmm5
movupd (%r13,%rax), %xmm6
movupd (%r13,%rdx), %xmm7
movapd %xmm5, %xmm4
subpd %xmm7, %xmm4
xorpd %xmm0, %xmm0
mulpd %xmm4, %xmm0
movapd %xmm4, %xmm1
shufpd $0x1, %xmm4, %xmm1      # xmm1 = xmm1[1],xmm4[0]
movapd %xmm0, %xmm2
subpd %xmm1, %xmm2
addpd %xmm0, %xmm1
movapd %xmm1, %xmm0
movsd %xmm2, %xmm0            # xmm0 = xmm2[0],xmm0[1]
ucomisd %xmm2, %xmm2
jp 0x2005
movapd %xmm3, %xmm1
subpd %xmm6, %xmm1
addpd %xmm7, %xmm5
addpd %xmm6, %xmm3
movapd %xmm3, %xmm2
addpd %xmm5, %xmm2
movupd %xmm2, (%rbx)
movapd %xmm1, %xmm2
subpd %xmm0, %xmm2
movupd %xmm2, 0x10(%rbx)
subpd %xmm5, %xmm3
movupd %xmm3, 0x20(%rbx)
addpd %xmm0, %xmm1
movl $0x38, %eax
movl $0x30, %ecx
movlpd %xmm1, (%rbx,%rcx)
movhpd %xmm1, (%rbx,%rax)
addq $0xd8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movl %esi, 0x90(%rsp)
movq %rax, 0x60(%rsp)
movl %eax, %ebp
shrl $0x2, %ebp
movq 0x38(%rsp), %rax
leal 0x2(%rax), %r14d
movq %r13, %rdi
movq %rbx, %rsi
movl %r14d, %edx
movl %r14d, 0x20(%rsp)
movl 0xc(%rsp), %ecx
callq 0x18f2
movq %rbp, %r15
shlq $0x4, %r15
leaq (%rbx,%r15), %rsi
movq %r12, %rdi
movq %rsi, 0x40(%rsp)
movl %r14d, %edx
movl 0xc(%rsp), %r14d
movl %r14d, %ecx
callq 0x18f2
movl $0x2, %edi
movq 0x38(%rsp), %rcx
shll %cl, %edi
shlq $0x4, %rdi
addq %r13, %rdi
leal (,%rbp,2), %r12d
shlq $0x4, %r12
leaq (%rbx,%r12), %rsi
movq %rsi, 0x10(%rsp)
movl 0x20(%rsp), %edx
movl %r14d, %ecx
callq 0x18f2
movl $0x3, %edi
movq 0x38(%rsp), %rcx
shll %cl, %edi
shlq $0x4, %rdi
addq %r13, %rdi
movq %rbp, 0x30(%rsp)
leal (%rbp,%rbp,2), %ebp
shlq $0x4, %rbp
leaq (%rbx,%rbp), %r13
movq %r13, %rsi
movl 0x20(%rsp), %edx
movl %r14d, %ecx
callq 0x18f2
movq %r15, %rsi
movq %r12, %r15
movupd (%rbx), %xmm3
movupd (%rbx,%rsi), %xmm5
movupd (%rbx,%r12), %xmm6
movupd (%rbx,%rbp), %xmm7
movapd %xmm5, %xmm4
subpd %xmm7, %xmm4
xorpd %xmm0, %xmm0
mulpd %xmm4, %xmm0
movapd %xmm4, %xmm1
shufpd $0x1, %xmm4, %xmm1      # xmm1 = xmm1[1],xmm4[0]
movapd %xmm0, %xmm2
subpd %xmm1, %xmm2
addpd %xmm0, %xmm1
movapd %xmm1, %xmm0
movsd %xmm2, %xmm0            # xmm0 = xmm2[0],xmm0[1]
ucomisd %xmm2, %xmm2
jp 0x206f
movapd %xmm3, %xmm1
subpd %xmm6, %xmm1
addpd %xmm7, %xmm5
addpd %xmm6, %xmm3
movapd %xmm3, %xmm2
addpd %xmm5, %xmm2
movupd %xmm2, (%rbx)
movapd %xmm1, %xmm2
subpd %xmm0, %xmm2
movq 0x40(%rsp), %rax
movupd %xmm2, (%rax)
subpd %xmm5, %xmm3
movq 0x10(%rsp), %rax
movupd %xmm3, (%rax)
addpd %xmm0, %xmm1
movupd %xmm1, (%r13)
movq 0x60(%rsp), %rdx
shrl $0x3, %edx
movq %rdx, %rax
shlq $0x4, %rax
leaq (%rbx,%rax), %r12
movsd (%rbx,%rax), %xmm6
movsd 0x8(%rbx,%rax), %xmm7
movsd (%r15,%r12), %xmm0
movsd 0x8(%r15,%r12), %xmm1
movsd 0x14ba(%rip), %xmm9     # 0x3070
movapd %xmm0, %xmm8
mulsd %xmm9, %xmm8
mulsd %xmm1, %xmm9
addsd %xmm1, %xmm8
subsd %xmm0, %xmm9
ucomisd %xmm8, %xmm8
movl 0x90(%rsp), %r14d
jp 0x20df
addq %r12, %r15
leaq (%r12,%rsi), %r13
movupd (%r12,%rsi), %xmm0
movapd 0x1639(%rip), %xmm1     # 0x3230
mulpd %xmm1, %xmm0
leaq (%r12,%rbp), %rax
movupd (%r12,%rbp), %xmm2
mulpd %xmm1, %xmm2
movapd %xmm0, %xmm10
unpckhpd %xmm0, %xmm10           # xmm10 = xmm10[1],xmm0[1]
movapd %xmm0, %xmm11
addsd %xmm10, %xmm11
subsd %xmm0, %xmm10
movapd %xmm2, %xmm12
unpckhpd %xmm2, %xmm12           # xmm12 = xmm12[1],xmm2[1]
movapd %xmm12, %xmm3
subsd %xmm2, %xmm3
xorpd 0x13f2(%rip), %xmm12    # 0x3030
subsd %xmm2, %xmm12
movapd %xmm11, %xmm5
subsd %xmm3, %xmm5
movapd %xmm10, %xmm4
subsd %xmm12, %xmm4
xorpd %xmm1, %xmm1
movapd %xmm5, %xmm0
mulsd %xmm1, %xmm0
mulsd %xmm4, %xmm1
subsd %xmm4, %xmm0
addsd %xmm5, %xmm1
ucomisd %xmm0, %xmm0
jp 0x213c
addsd %xmm12, %xmm10
addsd %xmm3, %xmm11
movapd %xmm7, %xmm2
subsd %xmm9, %xmm2
movapd %xmm6, %xmm3
subsd %xmm8, %xmm3
addsd %xmm9, %xmm7
addsd %xmm8, %xmm6
movapd %xmm6, %xmm4
addsd %xmm11, %xmm4
movapd %xmm7, %xmm5
addsd %xmm10, %xmm5
movsd %xmm4, (%r12)
movsd %xmm5, 0x8(%r12)
movapd %xmm3, %xmm4
subsd %xmm0, %xmm4
movapd %xmm2, %xmm5
subsd %xmm1, %xmm5
movsd %xmm4, (%r13)
movsd %xmm5, 0x8(%r13)
subsd %xmm11, %xmm6
subsd %xmm10, %xmm7
movsd %xmm6, (%r15)
movsd %xmm7, 0x8(%r15)
addsd %xmm0, %xmm3
addsd %xmm1, %xmm2
movsd %xmm3, (%rax)
movsd %xmm2, 0x8(%rax)
cmpl $0x4, %r14d
movq 0x30(%rsp), %rbp
jb 0x1a20
movl 0xc(%rsp), %ecx
addl $-0x3, %ecx
movl $0x1, %eax
movl %ecx, 0xc(%rsp)
shll %cl, %eax
movq %rax, 0xb0(%rsp)
decl %eax
movl %eax, 0xa0(%rsp)
cmpl $0x3, %edx
movl $0x2, %r14d
cmovbl %r14d, %edx
leaq (%rsi,%rbx), %r12
addq $-0x10, %r12
addq $0x10, %rbx
movl $0x1, %r15d
movl $0x3, %r13d
movq %rdx, 0x60(%rsp)
movq %rbx, 0x20(%rsp)
movl %r15d, %eax
movq 0x38(%rsp), %r9
movl %r9d, %ecx
shll %cl, %eax
movl %eax, %esi
movl 0xa0(%rsp), %ebx
andl %ebx, %esi
movl %eax, %edx
movl 0xc(%rsp), %r10d
movl %r10d, %ecx
shrl %cl, %edx
movq 0xb0(%rsp), %r11
movl %r11d, %ecx
subl %esi, %ecx
btl %r10d, %eax
cmovael %esi, %ecx
movl %edx, %esi
shrl %esi
xorl %edx, %esi
movl %esi, %edi
andl $0x1, %edi
leaq 0x32d6(%rip), %rax      # 0x5080
movq (%rax), %rax
shlq $0x4, %rcx
addq %rax, %rcx
shlq $0x3f, %rdx
xorq (%rcx,%rdi,8), %rdx
xorl $0x1, %edi
shlq $0x3f, %rsi
xorq (%rcx,%rdi,8), %rsi
movq %rsi, %xmm1
movq %xmm1, 0x70(%rsp)
movl %r14d, %edi
movl %r9d, %ecx
shll %cl, %edi
movl %edi, %r8d
andl %ebx, %r8d
movl %edi, %esi
movl %r10d, %ecx
shrl %cl, %esi
movl %r11d, %ecx
subl %r8d, %ecx
btl %r10d, %edi
cmovael %r8d, %ecx
movl %esi, %edi
shrl %edi
xorl %esi, %edi
movl %edi, %r8d
andl $0x1, %r8d
shlq $0x4, %rcx
addq %rax, %rcx
shlq $0x3f, %rsi
xorq (%rcx,%r8,8), %rsi
xorl $0x1, %r8d
shlq $0x3f, %rdi
xorq (%rcx,%r8,8), %rdi
movl %r13d, %r8d
movl %r9d, %ecx
shll %cl, %r8d
movq %rdx, %xmm0
movq %xmm0, 0x80(%rsp)
movq %rdi, %xmm3
movl %r8d, %edi
movl %r8d, %edx
movl %r10d, %ecx
shrl %cl, %edx
andl %ebx, %edi
movq 0x20(%rsp), %rbx
movl %r11d, %ecx
subl %edi, %ecx
btl %r10d, %r8d
cmovael %edi, %ecx
movl %edx, %edi
shrl %edi
xorl %edx, %edi
movl %edi, %r8d
andl $0x1, %r8d
shlq $0x4, %rcx
addq %rax, %rcx
shlq $0x3f, %rdx
xorq (%rcx,%r8,8), %rdx
movq %rsi, %xmm2
xorl $0x1, %r8d
shlq $0x3f, %rdi
xorq (%rcx,%r8,8), %rdi
movq %rdi, %xmm5
movq %rdx, %xmm4
movl %ebp, %edi
movq %rbx, %rsi
movdqa %xmm2, 0x40(%rsp)
movq %xmm3, 0x90(%rsp)
movq %xmm4, 0x50(%rsp)
movq %xmm5, 0x10(%rsp)
callq 0x221a
movsd 0x70(%rsp), %xmm1
movsd 0x80(%rsp), %xmm2
movapd %xmm2, %xmm3
pxor %xmm0, %xmm0
mulsd %xmm0, %xmm3
movapd %xmm1, %xmm6
mulsd %xmm0, %xmm6
subsd %xmm1, %xmm3
addsd %xmm2, %xmm6
ucomisd %xmm3, %xmm3
jp 0x1f7e
movq 0x30(%rsp), %rbp
movsd 0x50(%rsp), %xmm2
movapd %xmm2, %xmm4
xorpd %xmm0, %xmm0
mulsd %xmm0, %xmm4
movsd 0x10(%rsp), %xmm1
movapd %xmm1, %xmm5
mulsd %xmm0, %xmm5
subsd %xmm1, %xmm4
addsd %xmm2, %xmm5
ucomisd %xmm4, %xmm4
jp 0x1fb4
xorpd 0x1109(%rip), %xmm4     # 0x3030
movapd 0x1101(%rip), %xmm0     # 0x3030
xorpd %xmm0, %xmm6
movapd 0x40(%rsp), %xmm2
xorpd %xmm0, %xmm2
movl %ebp, %edi
movq %r12, %rsi
movapd %xmm3, %xmm0
movapd %xmm6, %xmm1
movsd 0x90(%rsp), %xmm3
callq 0x221a
incq %r15
addl $0x3, %r13d
addl $0x2, %r14d
addq $0x10, %rbx
addq $-0x10, %r12
movq 0x60(%rsp), %rdx
cmpq %r15, %rdx
jne 0x1d5b
jmp 0x1a20
ucomisd %xmm6, %xmm6
movq 0x30(%rsp), %rbp
jnp 0x1eed
movapd %xmm2, %xmm0
xorpd %xmm2, %xmm2
movsd 0x1283(%rip), %xmm3     # 0x3220
callq 0x2600
movq 0x30(%rsp), %rbp
movapd %xmm0, %xmm3
movapd %xmm1, %xmm6
jmp 0x1eed
ucomisd %xmm5, %xmm5
jnp 0x1f1f
xorpd %xmm2, %xmm2
movsd 0x50(%rsp), %xmm0
movsd 0x10(%rsp), %xmm1
movsd %xmm3, 0x10(%rsp)
movsd 0x1244(%rip), %xmm3     # 0x3220
movapd %xmm6, 0x50(%rsp)
callq 0x2600
movapd 0x50(%rsp), %xmm6
movsd 0x10(%rsp), %xmm3
movq 0x30(%rsp), %rbp
movapd %xmm0, %xmm4
movapd %xmm1, %xmm5
jmp 0x1f1f
unpckhpd %xmm1, %xmm1            # xmm1 = xmm1[1,1]
ucomisd %xmm1, %xmm1
jnp 0x19d6
movapd %xmm4, %xmm1
unpckhpd %xmm4, %xmm1            # xmm1 = xmm1[1],xmm4[1]
movapd %xmm3, 0x20(%rsp)
movsd 0x11f7(%rip), %xmm3     # 0x3220
xorpd %xmm2, %xmm2
movapd %xmm4, %xmm0
movapd %xmm5, 0x90(%rsp)
movapd %xmm6, 0x40(%rsp)
movapd %xmm7, 0x10(%rsp)
callq 0x2600
movapd 0x10(%rsp), %xmm7
movapd 0x40(%rsp), %xmm6
movapd 0x90(%rsp), %xmm5
movapd 0x20(%rsp), %xmm3
unpcklpd %xmm1, %xmm0            # xmm0 = xmm0[0],xmm1[0]
jmp 0x19d6
unpckhpd %xmm1, %xmm1            # xmm1 = xmm1[1,1]
ucomisd %xmm1, %xmm1
jnp 0x1b3e
movapd %xmm4, %xmm1
unpckhpd %xmm4, %xmm1            # xmm1 = xmm1[1],xmm4[1]
movapd %xmm3, 0x20(%rsp)
movsd 0x118d(%rip), %xmm3     # 0x3220
xorpd %xmm2, %xmm2
movapd %xmm4, %xmm0
movq %rsi, %r14
movapd %xmm5, 0x50(%rsp)
movapd %xmm6, 0x80(%rsp)
movapd %xmm7, 0x70(%rsp)
callq 0x2600
movapd 0x70(%rsp), %xmm7
movapd 0x80(%rsp), %xmm6
movapd 0x50(%rsp), %xmm5
movapd 0x20(%rsp), %xmm3
movq %r14, %rsi
unpcklpd %xmm1, %xmm0            # xmm0 = xmm0[0],xmm1[0]
jmp 0x1b3e
ucomisd %xmm9, %xmm9
jnp 0x1be2
movsd 0xf7e(%rip), %xmm2      # 0x3070
movsd 0x112e(%rip), %xmm3     # 0x3228
movq %rdx, %r13
movq %r15, 0x20(%rsp)
movq %rsi, %r15
movsd %xmm6, 0x40(%rsp)
movsd %xmm7, 0x10(%rsp)
callq 0x2600
movsd 0x10(%rsp), %xmm7
movsd 0x40(%rsp), %xmm6
movq %r15, %rsi
movq 0x20(%rsp), %r15
movq %r13, %rdx
movapd %xmm0, %xmm8
movapd %xmm1, %xmm9
jmp 0x1be2
ucomisd %xmm1, %xmm1
jnp 0x1c78
movapd %xmm3, 0xa0(%rsp)
movsd 0x10c9(%rip), %xmm3     # 0x3220
xorpd %xmm2, %xmm2
movapd %xmm5, %xmm0
movapd %xmm4, %xmm1
movq %r15, 0x20(%rsp)
movq %rdx, %r15
movq %rsi, %rbp
movsd %xmm6, 0x40(%rsp)
movsd %xmm7, 0x10(%rsp)
movsd %xmm8, 0x50(%rsp)
movsd %xmm9, 0x80(%rsp)
movq %rax, 0x70(%rsp)
movapd %xmm10, 0x60(%rsp)
movapd %xmm11, 0xb0(%rsp)
movapd %xmm12, 0xc0(%rsp)
callq 0x2600
movapd 0xc0(%rsp), %xmm12
movapd 0xa0(%rsp), %xmm3
movapd 0xb0(%rsp), %xmm11
movapd 0x60(%rsp), %xmm10
movq 0x70(%rsp), %rax
movsd 0x80(%rsp), %xmm9
movsd 0x50(%rsp), %xmm8
movsd 0x10(%rsp), %xmm7
movsd 0x40(%rsp), %xmm6
movq %rbp, %rsi
movq %r15, %rdx
movq 0x20(%rsp), %r15
jmp 0x1c78