user: 请从给定的汇编指令推导出C源代码：

```asm
<standard_membership_test>:
  endbr64
  push   %rbp
  lea    D122(%rip),%rdi
  mov    %rsp,%rbp
  push   %r14
  push   %r13
  lea    -0x41(%rbp),%r14
  lea    D10(%rip),%r13
  push   %r12
  sub    $0x38,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x28(%rbp)
  xor    %eax,%eax
  call   <puts@plt>
  lea    -0x38(%rbp),%rdx
  lea    -0x3c(%rbp),%rsi
  lea    -0x40(%rbp),%rdi
  call   <read_witness_set@plt>
  mov    -0x40(%rbp),%esi
  lea    D100(%rip),%rdi
  xor    %eax,%eax
  mov    %esi,%r12d
  sub    -0x3c(%rbp),%r12d
  call   <printf@plt>
  mov    -0x3c(%rbp),%esi
  lea    D133(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  mov    -0x38(%rbp),%esi
  lea    D4(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  lea    D103(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  xor    %eax,%eax
  mov    %r14,%rsi
  mov    %r13,%rdi
  call   <scanf@plt>
  cmpb   $0x79,-0x41(%rbp)
  je     L28
L7:
  mov    %r14,%rsi
  mov    %r13,%rdi
  xor    %eax,%eax
  call   <scanf@plt>
  lea    D88(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  xor    %eax,%eax
  mov    %r14,%rsi
  mov    %r13,%rdi
  call   <scanf@plt>
  cmpb   $0x79,-0x41(%rbp)
  je     L16
L15:
  mov    %r14,%rsi
  mov    %r13,%rdi
  xor    %eax,%eax
  call   <scanf@plt>
  lea    (%r12,%r12,1),%eax
  mov    %rsp,%rdx
  movl   $0x0,-0x2c(%rbp)
  cltq
  shl    $0x3,%rax
  mov    %rax,%rcx
  and    $0xfffffffffffff000,%rcx
  sub    %rcx,%rdx
  cmp    %rdx,%rsp
  je     L30
L8:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rdx,%rsp
  jne    L8
L30:
  and    $0xfff,%eax
  sub    %rax,%rsp
  test   %rax,%rax
  jne    L53
L80:
  lea    D25(%rip),%rdi
  xor    %eax,%eax
  mov    %rsp,%r13
  call   <printf@plt>
  lea    -0x2c(%rbp),%rsi
  lea    D50(%rip),%rdi
  xor    %eax,%eax
  call   <scanf@plt>
  lea    D70(%rip),%rdi
  call   <puts@plt>
  mov    %r13,%rsi
  mov    %r12d,%edi
  call   <standard_read_point@plt>
  mov    -0x2c(%rbp),%eax
  sub    $0x8,%rsp
  mov    -0x3c(%rbp),%edx
  lea    -0x30(%rbp),%r9
  lea    -0x34(%rbp),%r8
  mov    %r13,%rcx
  mov    %r12d,%esi
  push   %rax
  movsd  D113(%rip),%xmm1
  mov    $0x1,%edi
  movsd  D16(%rip),%xmm0
  call   <standard_homotopy_membership_test@plt>
  mov    -0x28(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L10
  lea    -0x18(%rbp),%rsp
  xor    %eax,%eax
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %rbp
  ret
  nopl   (%rax)
L16:
  lea    D18(%rip),%rdi
  call   <puts@plt>
  xor    %eax,%eax
  call   <solcon_write_standard_solutions@plt>
  jmp    L15
  nopl   0x0(%rax,%rax,1)
L28:
  lea    D79(%rip),%rdi
  call   <puts@plt>
  xor    %eax,%eax
  call   <syscon_write_standard_system@plt>
  jmp    L7
  nopl   0x0(%rax,%rax,1)
L53:
  orq    $0x0,-0x8(%rsp,%rax,1)
  jmp    L80
L10:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: label: D122
type: string
name: disassemble_data
arguments: label: D10
type: string
name: disassemble_data
arguments: label: D100
type: string
name: disassemble_data
arguments: label: D133
type: string
name: disassemble_data
arguments: label: D4
type: string
name: disassemble_data
arguments: label: D103
type: string
name: disassemble_data
arguments: label: D88
type: string
name: disassemble_data
arguments: label: D25
type: string
name: disassemble_data
arguments: label: D50
type: string
name: disassemble_data
arguments: label: D70
type: string
name: disassemble_data
arguments: label: D113
type: byte[8]
name: disassemble_data
arguments: label: D16
type: byte[8]
name: disassemble_data
arguments: label: D18
type: string
name: disassemble_data
arguments: label: D79
type: string

tool: D122: 
Reading a witness set ...

tool: D10: %c

tool: D100: 
The ambient dimension : %d.


tool: D133: The dimension of the solution set : %d.


tool: D4: The degree of the solution set : %d.


tool: D103: 
Do you want to see the embedded system ? (y/n) 

tool: D88: 
Do you want to see the solutions ? (y/n) 

tool: D25: 
Give the number of tasks : 

tool: D50: %d

tool: D70: 
Reading the coordinates of the test point x ...

tool: {"D113": [0x8d,0xed,0xb5,0xa0,0xf7,0xc6,0xb0,0x3e]}

tool: {"D16": [0x3a,0x8c,0x30,0xe2,0x8e,0x79,0x45,0x3e]}

tool: D18: 
The solutions read :

tool: D79: 
The system read :

assistant: ```c
int standard_membership_test(void) {
  int fail, n, dim, deg, nv;
  char ans;
  printf("\nReading a witness set ...\n");
  fail = read_witness_set(&n, &dim, &deg);
  nv = n - dim;
  if (1 > 0) {
    printf("\nThe ambient dimension : %d.\n", n);
    printf("The dimension of the solution set : %d.\n", dim);
    printf("The degree of the solution set : %d.\n", deg);
    printf("\nDo you want to see the embedded system ? (y/n) ");
    scanf("%c", &ans);
    if (ans == 'y') {
      printf("\nThe system read :\n");
      fail = syscon_write_standard_system();
    }
    scanf("%c", &ans);
    printf("\nDo you want to see the solutions ? (y/n) ");
    scanf("%c", &ans);
    if (ans == 'y') {
      printf("\nThe solutions read :\n");
      fail = solcon_write_standard_solutions();
    }
    scanf("%c", &ans);
  }
  {
    int fail, onsys, onset, nbtasks = 0;
    double tpt[2 * nv];
    const double restol = 1.0e-8;
    const double homtol = 1.0e-6;
    printf("\nGive the number of tasks : ");
    scanf("%d", &nbtasks);
    printf("\nReading the coordinates of the test point x ...\n");
    standard_read_point(nv, tpt);
    fail = standard_homotopy_membership_test(1, nv, dim, restol, homtol, tpt, &onsys, &onset, nbtasks);
  }
  return 0;
}
```