user: Converte this assembly snippet into its equivalent C code:

```asm
<WriteDict>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x828,%rsp
  mov    %rsi,(%rsp)
  mov    %rdx,0x8(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0x818(%rsp)
  xor    %eax,%eax
  test   %rdx,%rdx
  je     L193
  mov    %rdi,%rbp
  xor    %ebx,%ebx
  lea    0x10(%rsp),%r13
  lea    0x610(%rsp),%r12
  lea    0x210(%rsp),%r14
  lea    0x410(%rsp),%r15
  nopl   0x0(%rax)
L169:
  mov    (%rsp),%rax
  movb   $0x0,0x10(%rsp)
  movb   $0x0,0x210(%rsp)
  mov    (%rax,%rbx,8),%rax
  movb   $0x0,0x410(%rsp)
  movb   $0x0,0x610(%rsp)
  movzbl (%rax),%edx
  cmp    $0x27,%dl
  je     L184
  mov    %r13,%rcx
  cmp    $0x22,%dl
  jne    L115
  jmp    L184
  xchg   %ax,%ax
L171:
  add    $0x1,%rax
  mov    %dl,(%rcx)
  add    $0x1,%rcx
  movzbl (%rax),%edx
L115:
  cmp    $0x9,%dl
  jne    L171
  movb   $0x0,(%rcx)
  lea    0x1(%rax),%rdx
  movzbl 0x1(%rax),%eax
  mov    %r12,%rcx
  test   %al,%al
  je     L12
  cmp    $0x9,%al
  je     L12
  nopl   0x0(%rax,%rax,1)
L227:
  add    $0x1,%rdx
  mov    %al,(%rcx)
  add    $0x1,%rcx
  movzbl (%rdx),%eax
  cmp    $0x9,%al
  je     L12
  test   %al,%al
  jne    L227
L12:
  movb   $0x0,(%rcx)
  cmpb   $0x9,(%rdx)
  je     L165
L4:
  mov    %rbp,%rdi
  mov    %r13,%rdx
  lea    D0(%rip),%rsi
  call   <fprintf@plt>
  mov    %r14,%rdi
  call   <strlen@plt>
  test   %rax,%rax
  jne    L67
L44:
  mov    %r15,%rdi
  call   <strlen@plt>
  test   %rax,%rax
  jne    L128
L170:
  mov    %r12,%rdx
  lea    D9(%rip),%rsi
  mov    %rbp,%rdi
  add    $0x1,%rbx
  call   <fprintf@plt>
  cmp    %rbx,0x8(%rsp)
  jne    L169
L193:
  mov    0x818(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L121
  add    $0x828,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   0x0(%rax,%rax,1)
L184:
  movb   $0x5c,0x10(%rsp)
  lea    0x11(%rsp),%rcx
  movzbl (%rax),%edx
  jmp    L115
  nopw   0x0(%rax,%rax,1)
L128:
  mov    %r15,%rdx
  lea    D30(%rip),%rsi
  mov    %rbp,%rdi
  call   <fprintf@plt>
  jmp    L170
  nopl   0x0(%rax)
L67:
  mov    %r14,%rdx
  lea    D30(%rip),%rsi
  mov    %rbp,%rdi
  call   <fprintf@plt>
  jmp    L44
  nopw   0x0(%rax,%rax,1)
L165:
  movzbl 0x1(%rdx),%eax
  lea    0x1(%rdx),%rcx
  mov    %r14,%rdx
  cmp    $0x9,%al
  jne    L167
  jmp    L94
  nopl   0x0(%rax)
L173:
  add    $0x1,%rcx
  mov    %al,(%rdx)
  add    $0x1,%rdx
  movzbl (%rcx),%eax
  cmp    $0x9,%al
  je     L94
L167:
  test   %al,%al
  jne    L173
L94:
  movb   $0x0,(%rdx)
  cmpb   $0x9,(%rcx)
  jne    L4
  movzbl 0x1(%rcx),%edx
  lea    0x1(%rcx),%rsi
  mov    %r15,%rax
  test   %dl,%dl
  je     L114
  nopl   0x0(%rax,%rax,1)
L103:
  add    $0x1,%rsi
  mov    %dl,(%rax)
  add    $0x1,%rax
  movzbl (%rsi),%edx
  test   %dl,%dl
  jne    L103
L114:
  movb   $0x0,(%rax)
  jmp    L4
L121:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: data_tag: D0
type_infered: string
name: disassemble_data
arguments: data_tag: D9
type_infered: string
name: disassemble_data
arguments: data_tag: D30
type_infered: string

tool: D0: %s	

tool: D9: %s


tool: D30: %s 

assistant: ```c
void WriteDict(FILE *fout, char *index[], size_t nProns) {
  size_t nProc;
  char *s, *c;
  char word[512], oSym[512], pProb[512], pron[512];
  for (nProc = 0; nProc < nProns; nProc++) {
    word[0] = '\0';
    oSym[0] = '\0';
    pProb[0] = '\0';
    pron[0] = '\0';
    s = index[nProc];
    c = word;
    if ((*s == '\'') || (*s == '"'))
      *c++ = '\\';
    while (*s != '\t')
      *c++ = *s++;
    *c = '\0';
    c = pron;
    s++;
    while ((*s != '\t') && (*s != '\0'))
      *c++ = *s++;
    *c = '\0';
    if (*s == '\t') {
      s++;
      c = oSym;
      while ((*s != '\t') && (*s != '\0'))
        *c++ = *s++;
      *c = '\0';
      if (*s == '\t') {
        s++;
        c = pProb;
        while (*s != '\0')
          *c++ = *s++;
        *c = '\0';
      }
    }
    fprintf(fout, "%s\t", word);
    if (strlen(oSym) > 0)
      fprintf(fout, "%s ", oSym);
    if (strlen(pProb) > 0)
      fprintf(fout, "%s ", pProb);
    fprintf(fout, "%s\n", pron);
  }
}
```