user: What would the C source look like for the assembly code provided here:

```asm
<unpackforblock37_64>:
  endbr64
  push   %r15
  mov    %rdx,%r15
  movd   %edi,%xmm3
  push   %r14
  mov    %rsi,%r14
  pshufd $0x0,%xmm3,%xmm1
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    (%rsi),%rax
  mov    (%rdx),%r8
  mov    (%rax),%edx
  mov    0x28(%rax),%ecx
  add    $0x250,%rax
  mov    -0x224(%rax),%r9d
  mov    -0x214(%rax),%r11d
  mov    %edx,-0x2c(%rsp)
  mov    -0x238(%rax),%edx
  mov    -0x218(%rax),%r10d
  mov    -0x24c(%rax),%r12d
  mov    %ecx,-0x1c(%rsp)
  mov    -0x248(%rax),%ebp
  mov    -0x23c(%rax),%edi
  mov    %edx,-0x28(%rsp)
  mov    -0x234(%rax),%edx
  mov    %r9d,-0x18(%rsp)
  mov    %r11d,-0x10(%rsp)
  mov    -0x230(%rax),%ebx
  mov    %edx,-0x24(%rsp)
  mov    -0x22c(%rax),%edx
  mov    -0x220(%rax),%r9d
  mov    %r10d,-0x14(%rsp)
  mov    %edx,-0x20(%rsp)
  mov    -0x244(%rax),%r13d
  mov    -0x21c(%rax),%edx
  mov    -0x240(%rax),%esi
  mov    -0x210(%rax),%r10d
  mov    -0x208(%rax),%ecx
  mov    -0x20c(%rax),%r11d
  movd   -0x2c(%rsp),%xmm0
  mov    %rax,(%r14)
  mov    %r12d,%r14d
  mov    -0x2c(%rsp),%eax
  mov    %ecx,-0xc(%rsp)
  mov    $0x25,%ecx
  shl    $0x1b,%r14d
  sar    %cl,%eax
  mov    $0x2f,%ecx
  or     %r14d,%eax
  mov    %r12d,%r14d
  sar    %cl,%r12d
  mov    $0x39,%ecx
  sar    $0xa,%r14d
  movd   %eax,%xmm5
  movd   %r14d,%xmm2
  mov    %ebp,%r14d
  punpckldq %xmm5,%xmm0
  shl    $0x11,%r14d
  or     %r14d,%r12d
  mov    %ebp,%r14d
  sar    %cl,%ebp
  mov    $0x28,%ecx
  movd   %r12d,%xmm4
  sar    $0x14,%r14d
  punpckldq %xmm4,%xmm2
  punpcklqdq %xmm2,%xmm0
  paddd  %xmm1,%xmm0
  movups %xmm0,(%r8)
  movd   %r14d,%xmm0
  mov    %r13d,%r14d
  sar    $0x1e,%r13d
  shl    $0x7,%r14d
  movd   %r13d,%xmm2
  or     %r14d,%ebp
  mov    %esi,%r14d
  sar    %cl,%esi
  mov    $0x32,%ecx
  sar    $0x3,%r14d
  movd   %ebp,%xmm7
  mov    -0x28(%rsp),%ebp
  movd   %r14d,%xmm6
  punpckldq %xmm7,%xmm0
  mov    %edi,%r14d
  punpckldq %xmm6,%xmm2
  shl    $0x18,%r14d
  punpcklqdq %xmm2,%xmm0
  or     %r14d,%esi
  mov    %ebp,%r14d
  paddd  %xmm1,%xmm0
  shl    $0xe,%r14d
  movups %xmm0,0x10(%r8)
  movd   %esi,%xmm0
  mov    %edi,%esi
  sar    %cl,%edi
  sar    $0xd,%esi
  or     %r14d,%edi
  mov    $0x3c,%ecx
  mov    %ebp,%r14d
  sar    $0x17,%r14d
  movd   %esi,%xmm4
  mov    -0x24(%rsp),%esi
  sar    %cl,%ebp
  movd   %r14d,%xmm3
  mov    %ebp,%r14d
  movd   %edi,%xmm2
  mov    $0x21,%ecx
  mov    %esi,%eax
  mov    -0x20(%rsp),%edi
  punpckldq %xmm3,%xmm2
  punpckldq %xmm4,%xmm0
  shl    $0x4,%eax
  punpcklqdq %xmm2,%xmm0
  or     %eax,%r14d
  mov    %esi,%eax
  paddd  %xmm1,%xmm0
  mov    %ebx,%esi
  sar    %cl,%eax
  shl    $0x1f,%esi
  mov    $0x2b,%ecx
  movups %xmm0,0x20(%r8)
  or     %esi,%eax
  mov    %ebx,%esi
  sar    %cl,%ebx
  mov    %edi,%ecx
  shl    $0x15,%ecx
  sar    $0x6,%esi
  movd   %eax,%xmm6
  movd   %r14d,%xmm0
  or     %ecx,%ebx
  movd   %esi,%xmm2
  punpckldq %xmm6,%xmm0
  mov    %edi,%eax
  movd   %ebx,%xmm5
  mov    -0x1c(%rsp),%ebx
  mov    $0x35,%ecx
  sar    $0x10,%eax
  punpckldq %xmm5,%xmm2
  sar    %cl,%edi
  punpcklqdq %xmm2,%xmm0
  mov    %ebx,%ecx
  mov    %ebx,%esi
  paddd  %xmm1,%xmm0
  shl    $0xb,%ecx
  sar    $0x1a,%esi
  movups %xmm0,0x30(%r8)
  movd   %eax,%xmm0
  mov    %edi,%eax
  mov    -0x18(%rsp),%edi
  or     %ecx,%eax
  mov    $0x3f,%ecx
  movd   %esi,%xmm2
  sar    %cl,%ebx
  lea    (%rdi,%rdi,1),%esi
  movd   %eax,%xmm3
  mov    %ebx,%ecx
  punpckldq %xmm3,%xmm0
  mov    -0x14(%rsp),%ebx
  or     %esi,%ecx
  mov    %r9d,%esi
  movd   %ecx,%xmm7
  mov    $0x24,%ecx
  sar    $0x9,%esi
  sar    %cl,%edi
  movd   %esi,%xmm5
  punpckldq %xmm7,%xmm2
  mov    %edx,%esi
  mov    %edi,%eax
  mov    %r9d,%edi
  shl    $0x12,%esi
  punpcklqdq %xmm2,%xmm0
  shl    $0x1c,%edi
  paddd  %xmm1,%xmm0
  mov    %edi,%ecx
  mov    %eax,%edi
  movups %xmm0,0x40(%r8)
  or     %ecx,%edi
  mov    $0x2e,%ecx
  sar    %cl,%r9d
  movd   %edi,%xmm0
  mov    $0x38,%ecx
  mov    %r9d,%eax
  punpckldq %xmm5,%xmm0
  or     %esi,%eax
  mov    %edx,%esi
  sar    %cl,%edx
  mov    $0x27,%ecx
  sar    $0x13,%esi
  movd   %eax,%xmm2
  mov    %ebx,%eax
  movd   %esi,%xmm4
  shl    $0x8,%eax
  punpckldq %xmm4,%xmm2
  or     %eax,%edx
  mov    -0x10(%rsp),%eax
  punpcklqdq %xmm2,%xmm0
  paddd  %xmm1,%xmm0
  mov    %eax,%edi
  sar    %cl,%eax
  mov    $0x31,%ecx
  movups %xmm0,0x50(%r8)
  movd   %edx,%xmm0
  mov    %ebx,%edx
  mov    %r10d,%ebx
  shl    $0x19,%ebx
  sar    $0x1d,%edx
  or     %ebx,%eax
  movd   %edx,%xmm7
  sar    $0x2,%edi
  mov    %r10d,%edx
  movd   %eax,%xmm6
  mov    %r11d,%eax
  sar    %cl,%r10d
  movd   %edi,%xmm2
  shl    $0xf,%eax
  punpckldq %xmm6,%xmm2
  punpckldq %xmm7,%xmm0
  mov    $0x3b,%ecx
  or     %eax,%r10d
  mov    -0xc(%rsp),%eax
  punpcklqdq %xmm2,%xmm0
  mov    %r11d,%ebx
  sar    %cl,%r11d
  paddd  %xmm1,%xmm0
  sar    $0x16,%ebx
  movd   %r10d,%xmm4
  shl    $0x5,%eax
  sar    $0xc,%edx
  movups %xmm0,0x60(%r8)
  movd   %ebx,%xmm2
  or     %eax,%r11d
  movd   %edx,%xmm0
  movd   %r11d,%xmm3
  punpckldq %xmm4,%xmm0
  punpckldq %xmm3,%xmm2
  punpcklqdq %xmm2,%xmm0
  paddd  %xmm1,%xmm0
  movups %xmm0,0x70(%r8)
  pop    %rbx
  pop    %rbp
  subq   $0xffffffffffffff80,(%r15)
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

assistant: ```c
void unpackforblock37_64(const uint64_t base, const uint8_t **pw, uint64_t **pout) {
  const uint64_t *pw64 = *(const uint64_t **)pw;
  uint64_t *out = *pout;
  const uint64_t mask = (137438953471ULL);
  uint64_t w0 = pw64[0];
  uint64_t w1 = pw64[1];
  uint64_t w2 = pw64[2];
  uint64_t w3 = pw64[3];
  uint64_t w4 = pw64[4];
  uint64_t w5 = pw64[5];
  uint64_t w6 = pw64[6];
  uint64_t w7 = pw64[7];
  uint64_t w8 = pw64[8];
  uint64_t w9 = pw64[9];
  uint64_t w10 = pw64[10];
  uint64_t w11 = pw64[11];
  uint64_t w12 = pw64[12];
  uint64_t w13 = pw64[13];
  uint64_t w14 = pw64[14];
  uint64_t w15 = pw64[15];
  uint64_t w16 = pw64[16];
  uint64_t w17 = pw64[17];
  uint64_t w18 = pw64[18];
  *pw += 148;
  out[0] = base + ((w0)&mask);
  out[1] = base + (((w0 >> 37) | (w1 << 27)) & mask);
  out[2] = base + ((w1 >> 10) & mask);
  out[3] = base + (((w1 >> 47) | (w2 << 17)) & mask);
  out[4] = base + ((w2 >> 20) & mask);
  out[5] = base + (((w2 >> 57) | (w3 << 7)) & mask);
  out[6] = base + (((w3 >> 30) | (w4 << 34)) & mask);
  out[7] = base + ((w4 >> 3) & mask);
  out[8] = base + (((w4 >> 40) | (w5 << 24)) & mask);
  out[9] = base + ((w5 >> 13) & mask);
  out[10] = base + (((w5 >> 50) | (w6 << 14)) & mask);
  out[11] = base + ((w6 >> 23) & mask);
  out[12] = base + (((w6 >> 60) | (w7 << 4)) & mask);
  out[13] = base + (((w7 >> 33) | (w8 << 31)) & mask);
  out[14] = base + ((w8 >> 6) & mask);
  out[15] = base + (((w8 >> 43) | (w9 << 21)) & mask);
  out[16] = base + ((w9 >> 16) & mask);
  out[17] = base + (((w9 >> 53) | (w10 << 11)) & mask);
  out[18] = base + ((w10 >> 26) & mask);
  out[19] = base + (((w10 >> 63) | (w11 << 1)) & mask);
  out[20] = base + (((w11 >> 36) | (w12 << 28)) & mask);
  out[21] = base + ((w12 >> 9) & mask);
  out[22] = base + (((w12 >> 46) | (w13 << 18)) & mask);
  out[23] = base + ((w13 >> 19) & mask);
  out[24] = base + (((w13 >> 56) | (w14 << 8)) & mask);
  out[25] = base + (((w14 >> 29) | (w15 << 35)) & mask);
  out[26] = base + ((w15 >> 2) & mask);
  out[27] = base + (((w15 >> 39) | (w16 << 25)) & mask);
  out[28] = base + ((w16 >> 12) & mask);
  out[29] = base + (((w16 >> 49) | (w17 << 15)) & mask);
  out[30] = base + ((w17 >> 22) & mask);
  out[31] = base + (((w17 >> 59) | (w18 << 5)) & mask);
  *pout += 32;
}
```