user: Translate the below assembly code into C programming language:

```asm
<fdct>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  mov    %rdi,-0x68(%rbp)
  mov    %esi,-0x6c(%rbp)
  mov    -0x68(%rbp),%rax
  mov    %rax,-0x8(%rbp)
  movl   $0x0,-0x54(%rbp)
  jmp    L28
L22:
  mov    -0x8(%rbp),%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    -0x8(%rbp),%rax
  add    $0xe,%rax
  movzwl (%rax),%eax
  cwtl
  add    %edx,%eax
  mov    %eax,-0x50(%rbp)
  mov    -0x8(%rbp),%rax
  movzwl (%rax),%eax
  cwtl
  mov    -0x8(%rbp),%rdx
  add    $0xe,%rdx
  movzwl (%rdx),%edx
  movswl %dx,%edx
  sub    %edx,%eax
  mov    %eax,-0x4c(%rbp)
  mov    -0x8(%rbp),%rax
  add    $0x2,%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    -0x8(%rbp),%rax
  add    $0xc,%rax
  movzwl (%rax),%eax
  cwtl
  add    %edx,%eax
  mov    %eax,-0x48(%rbp)
  mov    -0x8(%rbp),%rax
  add    $0x2,%rax
  movzwl (%rax),%eax
  cwtl
  mov    -0x8(%rbp),%rdx
  add    $0xc,%rdx
  movzwl (%rdx),%edx
  movswl %dx,%edx
  sub    %edx,%eax
  mov    %eax,-0x44(%rbp)
  mov    -0x8(%rbp),%rax
  add    $0x4,%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    -0x8(%rbp),%rax
  add    $0xa,%rax
  movzwl (%rax),%eax
  cwtl
  add    %edx,%eax
  mov    %eax,-0x40(%rbp)
  mov    -0x8(%rbp),%rax
  add    $0x4,%rax
  movzwl (%rax),%eax
  cwtl
  mov    -0x8(%rbp),%rdx
  add    $0xa,%rdx
  movzwl (%rdx),%edx
  movswl %dx,%edx
  sub    %edx,%eax
  mov    %eax,-0x3c(%rbp)
  mov    -0x8(%rbp),%rax
  add    $0x6,%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    -0x8(%rbp),%rax
  add    $0x8,%rax
  movzwl (%rax),%eax
  cwtl
  add    %edx,%eax
  mov    %eax,-0x38(%rbp)
  mov    -0x8(%rbp),%rax
  add    $0x6,%rax
  movzwl (%rax),%eax
  cwtl
  mov    -0x8(%rbp),%rdx
  add    $0x8,%rdx
  movzwl (%rdx),%edx
  movswl %dx,%edx
  sub    %edx,%eax
  mov    %eax,-0x34(%rbp)
  mov    -0x50(%rbp),%edx
  mov    -0x38(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x30(%rbp)
  mov    -0x50(%rbp),%eax
  sub    -0x38(%rbp),%eax
  mov    %eax,-0x2c(%rbp)
  mov    -0x48(%rbp),%edx
  mov    -0x40(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x28(%rbp)
  mov    -0x48(%rbp),%eax
  sub    -0x40(%rbp),%eax
  mov    %eax,-0x24(%rbp)
  mov    -0x30(%rbp),%edx
  mov    -0x28(%rbp),%eax
  add    %edx,%eax
  shl    $0x2,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  mov    %dx,(%rax)
  mov    -0x30(%rbp),%eax
  sub    -0x28(%rbp),%eax
  lea    0x0(,%rax,4),%edx
  mov    -0x8(%rbp),%rax
  add    $0x8,%rax
  mov    %dx,(%rax)
  movl   $0x1151,-0x20(%rbp)
  mov    -0x24(%rbp),%edx
  mov    -0x2c(%rbp),%eax
  add    %eax,%edx
  mov    -0x20(%rbp),%eax
  imul   %edx,%eax
  mov    %eax,-0x1c(%rbp)
  movl   $0x187e,-0x20(%rbp)
  mov    -0x2c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,%edx
  mov    -0x1c(%rbp),%eax
  add    %edx,%eax
  sar    $0xb,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  add    $0x4,%rax
  mov    %dx,(%rax)
  movl   $0xffffc4df,-0x20(%rbp)
  mov    -0x24(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,%edx
  mov    -0x1c(%rbp),%eax
  add    %edx,%eax
  sar    $0xb,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  add    $0xc,%rax
  mov    %dx,(%rax)
  mov    -0x34(%rbp),%edx
  mov    -0x4c(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x1c(%rbp)
  mov    -0x3c(%rbp),%edx
  mov    -0x44(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x18(%rbp)
  mov    -0x34(%rbp),%edx
  mov    -0x44(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x14(%rbp)
  mov    -0x3c(%rbp),%edx
  mov    -0x4c(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x10(%rbp)
  movl   $0x25a1,-0x20(%rbp)
  mov    -0x14(%rbp),%edx
  mov    -0x10(%rbp),%eax
  add    %eax,%edx
  mov    -0x20(%rbp),%eax
  imul   %edx,%eax
  mov    %eax,-0xc(%rbp)
  movl   $0x98e,-0x20(%rbp)
  mov    -0x34(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x34(%rbp)
  movl   $0x41b3,-0x20(%rbp)
  mov    -0x3c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x3c(%rbp)
  movl   $0x6254,-0x20(%rbp)
  mov    -0x44(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x44(%rbp)
  movl   $0x300b,-0x20(%rbp)
  mov    -0x4c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x4c(%rbp)
  movl   $0xffffe333,-0x20(%rbp)
  mov    -0x1c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x1c(%rbp)
  movl   $0xffffadfd,-0x20(%rbp)
  mov    -0x18(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x18(%rbp)
  movl   $0xffffc13b,-0x20(%rbp)
  mov    -0x14(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x14(%rbp)
  movl   $0xfffff384,-0x20(%rbp)
  mov    -0x10(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x10(%rbp)
  mov    -0xc(%rbp),%eax
  add    %eax,-0x14(%rbp)
  mov    -0xc(%rbp),%eax
  add    %eax,-0x10(%rbp)
  mov    -0x34(%rbp),%edx
  mov    -0x1c(%rbp),%eax
  add    %eax,%edx
  mov    -0x14(%rbp),%eax
  add    %edx,%eax
  sar    $0xb,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  add    $0xe,%rax
  mov    %dx,(%rax)
  mov    -0x3c(%rbp),%edx
  mov    -0x18(%rbp),%eax
  add    %eax,%edx
  mov    -0x10(%rbp),%eax
  add    %edx,%eax
  sar    $0xb,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  add    $0xa,%rax
  mov    %dx,(%rax)
  mov    -0x44(%rbp),%edx
  mov    -0x18(%rbp),%eax
  add    %eax,%edx
  mov    -0x14(%rbp),%eax
  add    %edx,%eax
  sar    $0xb,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  add    $0x6,%rax
  mov    %dx,(%rax)
  mov    -0x4c(%rbp),%edx
  mov    -0x1c(%rbp),%eax
  add    %eax,%edx
  mov    -0x10(%rbp),%eax
  add    %edx,%eax
  sar    $0xb,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  add    $0x2,%rax
  mov    %dx,(%rax)
  mov    -0x6c(%rbp),%eax
  cltq
  add    %rax,%rax
  add    %rax,-0x8(%rbp)
  addl   $0x1,-0x54(%rbp)
L28:
  cmpl   $0x7,-0x54(%rbp)
  jle    L22
  mov    -0x68(%rbp),%rax
  mov    %rax,-0x8(%rbp)
  movl   $0x0,-0x54(%rbp)
  jmp    L25
L1:
  mov    -0x8(%rbp),%rax
  movzwl (%rax),%eax
  movswl %ax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  shl    $0x3,%eax
  sub    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  cwtl
  add    %ecx,%eax
  mov    %eax,-0x50(%rbp)
  mov    -0x8(%rbp),%rax
  movzwl (%rax),%eax
  movswl %ax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  shl    $0x3,%eax
  sub    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    %ecx,%eax
  sub    %edx,%eax
  mov    %eax,-0x4c(%rbp)
  mov    -0x6c(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  add    %eax,%eax
  add    %edx,%eax
  add    %eax,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  cwtl
  add    %ecx,%eax
  mov    %eax,-0x48(%rbp)
  mov    -0x6c(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  add    %eax,%eax
  add    %edx,%eax
  add    %eax,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    %ecx,%eax
  sub    %edx,%eax
  mov    %eax,-0x44(%rbp)
  mov    -0x6c(%rbp),%eax
  add    %eax,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  shl    $0x2,%eax
  add    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  cwtl
  add    %ecx,%eax
  mov    %eax,-0x40(%rbp)
  mov    -0x6c(%rbp),%eax
  add    %eax,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  shl    $0x2,%eax
  add    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    %ecx,%eax
  sub    %edx,%eax
  mov    %eax,-0x3c(%rbp)
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  add    %eax,%eax
  add    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  movswl %ax,%edx
  mov    -0x6c(%rbp),%eax
  shl    $0x2,%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x8(%rbp),%rax
  add    %rcx,%rax
  movzwl (%rax),%eax
  cwtl
  add    %edx,%eax
  mov    %eax,-0x38(%rbp)
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  add    %eax,%eax
  add    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  cwtl
  mov    -0x6c(%rbp),%edx
  shl    $0x2,%edx
  movslq %edx,%rdx
  lea    (%rdx,%rdx,1),%rcx
  mov    -0x8(%rbp),%rdx
  add    %rcx,%rdx
  movzwl (%rdx),%edx
  movswl %dx,%edx
  sub    %edx,%eax
  mov    %eax,-0x34(%rbp)
  mov    -0x50(%rbp),%edx
  mov    -0x38(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x30(%rbp)
  mov    -0x50(%rbp),%eax
  sub    -0x38(%rbp),%eax
  mov    %eax,-0x2c(%rbp)
  mov    -0x48(%rbp),%edx
  mov    -0x40(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x28(%rbp)
  mov    -0x48(%rbp),%eax
  sub    -0x40(%rbp),%eax
  mov    %eax,-0x24(%rbp)
  mov    -0x30(%rbp),%edx
  mov    -0x28(%rbp),%eax
  add    %edx,%eax
  sar    $0x5,%eax
  mov    %eax,%edx
  mov    -0x8(%rbp),%rax
  mov    %dx,(%rax)
  mov    -0x30(%rbp),%eax
  sub    -0x28(%rbp),%eax
  sar    $0x5,%eax
  mov    %eax,%edx
  mov    -0x6c(%rbp),%eax
  shl    $0x2,%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x8(%rbp),%rax
  add    %rcx,%rax
  mov    %dx,(%rax)
  movl   $0x1151,-0x20(%rbp)
  mov    -0x24(%rbp),%edx
  mov    -0x2c(%rbp),%eax
  add    %eax,%edx
  mov    -0x20(%rbp),%eax
  imul   %edx,%eax
  mov    %eax,-0x1c(%rbp)
  movl   $0x187e,-0x20(%rbp)
  mov    -0x2c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,%edx
  mov    -0x1c(%rbp),%eax
  add    %edx,%eax
  sar    $0x12,%eax
  mov    %eax,%edx
  mov    -0x6c(%rbp),%eax
  add    %eax,%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x8(%rbp),%rax
  add    %rcx,%rax
  mov    %dx,(%rax)
  movl   $0xffffc4df,-0x20(%rbp)
  mov    -0x24(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,%edx
  mov    -0x1c(%rbp),%eax
  add    %edx,%eax
  sar    $0x12,%eax
  mov    %eax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  add    %eax,%eax
  add    %edx,%eax
  add    %eax,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    %ecx,%edx
  mov    %dx,(%rax)
  mov    -0x34(%rbp),%edx
  mov    -0x4c(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x1c(%rbp)
  mov    -0x3c(%rbp),%edx
  mov    -0x44(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x18(%rbp)
  mov    -0x34(%rbp),%edx
  mov    -0x44(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x14(%rbp)
  mov    -0x3c(%rbp),%edx
  mov    -0x4c(%rbp),%eax
  add    %edx,%eax
  mov    %eax,-0x10(%rbp)
  movl   $0x25a1,-0x20(%rbp)
  mov    -0x14(%rbp),%edx
  mov    -0x10(%rbp),%eax
  add    %eax,%edx
  mov    -0x20(%rbp),%eax
  imul   %edx,%eax
  mov    %eax,-0xc(%rbp)
  movl   $0x98e,-0x20(%rbp)
  mov    -0x34(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x34(%rbp)
  movl   $0x41b3,-0x20(%rbp)
  mov    -0x3c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x3c(%rbp)
  movl   $0x6254,-0x20(%rbp)
  mov    -0x44(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x44(%rbp)
  movl   $0x300b,-0x20(%rbp)
  mov    -0x4c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x4c(%rbp)
  movl   $0xffffe333,-0x20(%rbp)
  mov    -0x1c(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x1c(%rbp)
  movl   $0xffffadfd,-0x20(%rbp)
  mov    -0x18(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x18(%rbp)
  movl   $0xffffc13b,-0x20(%rbp)
  mov    -0x14(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x14(%rbp)
  movl   $0xfffff384,-0x20(%rbp)
  mov    -0x10(%rbp),%eax
  imul   -0x20(%rbp),%eax
  mov    %eax,-0x10(%rbp)
  mov    -0xc(%rbp),%eax
  add    %eax,-0x14(%rbp)
  mov    -0xc(%rbp),%eax
  add    %eax,-0x10(%rbp)
  mov    -0x34(%rbp),%edx
  mov    -0x1c(%rbp),%eax
  add    %eax,%edx
  mov    -0x14(%rbp),%eax
  add    %edx,%eax
  sar    $0x12,%eax
  mov    %eax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  shl    $0x3,%eax
  sub    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    %ecx,%edx
  mov    %dx,(%rax)
  mov    -0x3c(%rbp),%edx
  mov    -0x18(%rbp),%eax
  add    %eax,%edx
  mov    -0x10(%rbp),%eax
  add    %edx,%eax
  sar    $0x12,%eax
  mov    %eax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  shl    $0x2,%eax
  add    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    %ecx,%edx
  mov    %dx,(%rax)
  mov    -0x44(%rbp),%edx
  mov    -0x18(%rbp),%eax
  add    %eax,%edx
  mov    -0x14(%rbp),%eax
  add    %edx,%eax
  sar    $0x12,%eax
  mov    %eax,%ecx
  mov    -0x6c(%rbp),%edx
  mov    %edx,%eax
  add    %eax,%eax
  add    %edx,%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    %ecx,%edx
  mov    %dx,(%rax)
  mov    -0x4c(%rbp),%edx
  mov    -0x1c(%rbp),%eax
  add    %eax,%edx
  mov    -0x10(%rbp),%eax
  add    %edx,%eax
  sar    $0x12,%eax
  mov    %eax,%edx
  mov    -0x6c(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x8(%rbp),%rax
  add    %rcx,%rax
  mov    %dx,(%rax)
  addq   $0x2,-0x8(%rbp)
  addl   $0x1,-0x54(%rbp)
L25:
  cmpl   $0x7,-0x54(%rbp)
  jle    L1
  nop
  nop
  pop    %rbp
  ret
```

assistant: ```c
void fdct(short int *blk, int lx) {
  int tmp0, tmp1, tmp2, tmp3, tmp4, tmp5, tmp6, tmp7;
  int tmp10, tmp11, tmp12, tmp13;
  int z1, z2, z3, z4, z5;
  int i;
  short int *block;
  int constant;
  block = blk;
  for (i = 0; i < 8; i++) {
    tmp0 = block[0] + block[7];
    tmp7 = block[0] - block[7];
    tmp1 = block[1] + block[6];
    tmp6 = block[1] - block[6];
    tmp2 = block[2] + block[5];
    tmp5 = block[2] - block[5];
    tmp3 = block[3] + block[4];
    tmp4 = block[3] - block[4];
    tmp10 = tmp0 + tmp3;
    tmp13 = tmp0 - tmp3;
    tmp11 = tmp1 + tmp2;
    tmp12 = tmp1 - tmp2;
    block[0] = ((tmp10 + tmp11) << 2);
    block[4] = ((tmp10 - tmp11) << 2);
    constant = 4433;
    z1 = (tmp12 + tmp13) * constant;
    constant = 6270;
    block[2] = (z1 + (tmp13 * constant)) >> (13 - 2);
    constant = -15137;
    block[6] = (z1 + (tmp12 * constant)) >> (13 - 2);
    z1 = tmp4 + tmp7;
    z2 = tmp5 + tmp6;
    z3 = tmp4 + tmp6;
    z4 = tmp5 + tmp7;
    constant = 9633;
    z5 = ((z3 + z4) * constant);
    constant = 2446;
    tmp4 = (tmp4 * constant);
    constant = 16819;
    tmp5 = (tmp5 * constant);
    constant = 25172;
    tmp6 = (tmp6 * constant);
    constant = 12299;
    tmp7 = (tmp7 * constant);
    constant = -7373;
    z1 = (z1 * constant);
    constant = -20995;
    z2 = (z2 * constant);
    constant = -16069;
    z3 = (z3 * constant);
    constant = -3196;
    z4 = (z4 * constant);
    z3 += z5;
    z4 += z5;
    block[7] = (tmp4 + z1 + z3) >> (13 - 2);
    block[5] = (tmp5 + z2 + z4) >> (13 - 2);
    block[3] = (tmp6 + z2 + z3) >> (13 - 2);
    block[1] = (tmp7 + z1 + z4) >> (13 - 2);
    block += lx;
  }
  block = blk;
  for (i = 0; i < 8; i++) {
    tmp0 = block[0] + block[7 * lx];
    tmp7 = block[0] - block[7 * lx];
    tmp1 = block[lx] + block[6 * lx];
    tmp6 = block[lx] - block[6 * lx];
    tmp2 = block[2 * lx] + block[5 * lx];
    tmp5 = block[2 * lx] - block[5 * lx];
    tmp3 = block[3 * lx] + block[4 * lx];
    tmp4 = block[3 * lx] - block[4 * lx];
    tmp10 = tmp0 + tmp3;
    tmp13 = tmp0 - tmp3;
    tmp11 = tmp1 + tmp2;
    tmp12 = tmp1 - tmp2;
    block[0] = (tmp10 + tmp11) >> (2 + 3);
    block[4 * lx] = (tmp10 - tmp11) >> (2 + 3);
    constant = 4433;
    z1 = ((tmp12 + tmp13) * constant);
    constant = 6270;
    block[2 * lx] = (z1 + (tmp13 * constant)) >> (13 + 2 + 3);
    constant = -15137;
    block[6 * lx] = (z1 + (tmp12 * constant)) >> (13 + 2 + 3);
    z1 = tmp4 + tmp7;
    z2 = tmp5 + tmp6;
    z3 = tmp4 + tmp6;
    z4 = tmp5 + tmp7;
    constant = 9633;
    z5 = ((z3 + z4) * constant);
    constant = 2446;
    tmp4 = (tmp4 * constant);
    constant = 16819;
    tmp5 = (tmp5 * constant);
    constant = 25172;
    tmp6 = (tmp6 * constant);
    constant = 12299;
    tmp7 = (tmp7 * constant);
    constant = -7373;
    z1 = (z1 * constant);
    constant = -20995;
    z2 = (z2 * constant);
    constant = -16069;
    z3 = (z3 * constant);
    constant = -3196;
    z4 = (z4 * constant);
    z3 += z5;
    z4 += z5;
    block[7 * lx] = (tmp4 + z1 + z3) >> (13 + 2 + 3);
    block[5 * lx] = (tmp5 + z2 + z4) >> (13 + 2 + 3);
    block[3 * lx] = (tmp6 + z2 + z3) >> (13 + 2 + 3);
    block[lx] = (tmp7 + z1 + z4) >> (13 + 2 + 3);
    block++;
  }
}
```