user: 请将这段汇编代码片段转换成等效的C代码：

```asm
<test_spg_get_ir_reciprocal_mesh>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r12
  push   %rbx
  sub    $0x130,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x18(%rbp)
  xor    %eax,%eax
  movsd  D59(%rip),%xmm0
  movsd  %xmm0,-0x100(%rbp)
  movq   $0x0,-0xf8(%rbp)
  movq   $0x0,-0xf0(%rbp)
  movq   $0x0,-0xe8(%rbp)
  movsd  %xmm0,-0xe0(%rbp)
  movq   $0x0,-0xd8(%rbp)
  movq   $0x0,-0xd0(%rbp)
  movq   $0x0,-0xc8(%rbp)
  mov    D97(%rip),%rax
  mov    %rax,-0xc0(%rbp)
  movq   $0x0,-0xb0(%rbp)
  movq   $0x0,-0xa8(%rbp)
  movq   $0x0,-0xa0(%rbp)
  movsd  D65(%rip),%xmm0
  movsd  %xmm0,-0x98(%rbp)
  movsd  %xmm0,-0x90(%rbp)
  movsd  %xmm0,-0x88(%rbp)
  movsd  D86(%rip),%xmm1
  movsd  %xmm1,-0x80(%rbp)
  movsd  %xmm1,-0x78(%rbp)
  movq   $0x0,-0x70(%rbp)
  movsd  D57(%rip),%xmm1
  movsd  %xmm1,-0x68(%rbp)
  movsd  %xmm1,-0x60(%rbp)
  movq   $0x0,-0x58(%rbp)
  movsd  D19(%rip),%xmm1
  movsd  %xmm1,-0x50(%rbp)
  movsd  D15(%rip),%xmm2
  movsd  %xmm2,-0x48(%rbp)
  movsd  %xmm0,-0x40(%rbp)
  movsd  %xmm2,-0x38(%rbp)
  movsd  %xmm1,-0x30(%rbp)
  movsd  %xmm0,-0x28(%rbp)
  movl   $0x1,-0x120(%rbp)
  movl   $0x1,-0x11c(%rbp)
  movl   $0x2,-0x118(%rbp)
  movl   $0x2,-0x114(%rbp)
  movl   $0x2,-0x110(%rbp)
  movl   $0x2,-0x10c(%rbp)
  movl   $0x28,-0x138(%rbp)
  movl   $0x28,-0x134(%rbp)
  movl   $0x28,-0x130(%rbp)
  movl   $0x1,-0x12c(%rbp)
  movl   $0x1,-0x128(%rbp)
  movl   $0x1,-0x124(%rbp)
  lea    -0xbb000(%rsp),%rax
L1:
  cmp    %rax,%rsp
  je     L5
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L1
L5:
  sub    $0x800,%rsp
  orq    $0x0,0x7f8(%rsp)
  mov    %rsp,%rbx
  lea    -0x3e000(%rsp),%rax
L26:
  cmp    %rax,%rsp
  je     L25
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L26
L25:
  sub    $0x800,%rsp
  orq    $0x0,0x7f8(%rsp)
  mov    %rsp,%r12
  lea    D50(%rip),%rdi
  call   <puts@plt>
  lea    -0x12c(%rbp),%rcx
  lea    -0x138(%rbp),%rdx
  push   $0x0
  push   $0x6
  lea    -0x120(%rbp),%rax
  push   %rax
  lea    -0xb0(%rbp),%rax
  push   %rax
  lea    -0x100(%rbp),%r9
  mov    $0x1,%r8d
  mov    %r12,%rsi
  mov    %rbx,%rdi
  call   <spg_get_ir_reciprocal_mesh@plt>
  mov    %eax,%ebx
  mov    %r12,%rsp
  lea    D81(%rip),%rdi
  call   <puts@plt>
  mov    %ebx,%esi
  lea    D71(%rip),%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  mov    -0x18(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L31
  lea    -0x10(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %rbp
  ret
L31:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: data_tag: D59
type_guessed: byte[8]
name: unpack_data
arguments: data_tag: D97
type_guessed: byte[8]
name: unpack_data
arguments: data_tag: D65
type_guessed: f64
name: unpack_data
arguments: data_tag: D86
type_guessed: f64
name: unpack_data
arguments: data_tag: D57
type_guessed: f64
name: unpack_data
arguments: data_tag: D19
type_guessed: f64
name: unpack_data
arguments: data_tag: D15
type_guessed: f64
name: unpack_data
arguments: data_tag: D50
type_guessed: string
name: unpack_data
arguments: data_tag: D81
type_guessed: string
name: unpack_data
arguments: data_tag: D71
type_guessed: string

tool: {"D59": [0x00,0x00,0x00,0x00,0x00,0x00,0x10,0x40]}

tool: {"D97": [0x00,0x00,0x00,0x00,0x00,0x00,0x08,0x40]}

tool: D65: 0.5

tool: D86: 0.3

tool: D57: 0.7

tool: D19: 0.2

tool: D15: 0.8

tool: D50: *** Example of spg_get_ir_reciprocal_mesh of Rutile structure ***:

tool: D81: Number of irreducible k-points of Rutile with

tool: D71: 40x40x40 Monkhorst-Pack mesh is %d (4200).


assistant: ```c
void test_spg_get_ir_reciprocal_mesh(void) {
  double lattice[3][3] = {{4, 0, 0}, {0, 4, 0}, {0, 0, 3}};
  double position[][3] = {
      {0, 0, 0}, {0.5, 0.5, 0.5}, {0.3, 0.3, 0}, {0.7, 0.7, 0}, {0.2, 0.8, 0.5}, {0.8, 0.2, 0.5},
  };
  int types[] = {1, 1, 2, 2, 2, 2};
  int num_atom = 6;
  int m = 40;
  int mesh[] = {m, m, m};
  int is_shift[] = {1, 1, 1};
  int grid_address[m * m * m][3];
  int grid_mapping_table[m * m * m];
  printf("*** Example of spg_get_ir_reciprocal_mesh of Rutile structure ***:\n");
  int num_ir = spg_get_ir_reciprocal_mesh(grid_address, grid_mapping_table, mesh, is_shift, 1, lattice, position, types, num_atom, 1e-5);
  printf("Number of irreducible k-points of Rutile with\n");
  printf("40x40x40 Monkhorst-Pack mesh is %d (4200).\n", num_ir);
}
```