user: 请显示与下面列出的汇编代码相匹配的C语言实现：

```asm
<trnspt>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x40,%rsp
  mov    %rdi,-0x28(%rbp)
  mov    %esi,-0x2c(%rbp)
  mov    %rdx,-0x38(%rbp)
  mov    -0x2c(%rbp),%eax
  mov    %eax,%esi
  mov    $0x1,%edi
  call   <ivector@plt>
  mov    %rax,-0x8(%rbp)
  mov    -0x38(%rbp),%rax
  add    $0x8,%rax
  mov    (%rax),%eax
  mov    -0x38(%rbp),%rdx
  add    $0x4,%rdx
  mov    (%rdx),%edx
  sub    %edx,%eax
  mov    %eax,%ecx
  mov    -0x2c(%rbp),%eax
  add    %ecx,%eax
  cltd
  idivl  -0x2c(%rbp)
  mov    %edx,%eax
  add    $0x1,%eax
  mov    %eax,-0x18(%rbp)
  mov    -0x38(%rbp),%rax
  add    $0x14,%rax
  mov    (%rax),%eax
  mov    -0x38(%rbp),%rdx
  add    $0x10,%rdx
  mov    (%rdx),%edx
  sub    %edx,%eax
  mov    %eax,%ecx
  mov    -0x2c(%rbp),%eax
  add    %ecx,%eax
  cltd
  idivl  -0x2c(%rbp)
  mov    %edx,%eax
  add    $0x1,%eax
  mov    %eax,-0x14(%rbp)
  mov    -0x38(%rbp),%rax
  add    $0xc,%rax
  mov    (%rax),%eax
  mov    -0x38(%rbp),%rdx
  add    $0x18,%rdx
  mov    (%rdx),%edx
  sub    %edx,%eax
  mov    %eax,%ecx
  mov    -0x2c(%rbp),%eax
  add    %ecx,%eax
  cltd
  idivl  -0x2c(%rbp)
  mov    %edx,%eax
  add    $0x1,%eax
  mov    %eax,-0x10(%rbp)
  movl   $0x1,-0x20(%rbp)
  movl   $0x1,-0x1c(%rbp)
  jmp    L6
L1:
  mov    -0x38(%rbp),%rax
  add    $0x4,%rax
  mov    (%rax),%edx
  mov    -0x1c(%rbp),%eax
  add    %edx,%eax
  sub    $0x2,%eax
  cltd
  idivl  -0x2c(%rbp)
  mov    %edx,%eax
  add    $0x1,%eax
  mov    %eax,-0xc(%rbp)
  mov    -0xc(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x28(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  mov    -0x20(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    %edx,-0x20(%rbp)
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x8(%rbp),%rax
  add    %rax,%rdx
  mov    (%rcx),%eax
  mov    %eax,(%rdx)
  addl   $0x1,-0x1c(%rbp)
L6:
  mov    -0x1c(%rbp),%eax
  cmp    -0x18(%rbp),%eax
  jle    L1
  movl   $0x1,-0x1c(%rbp)
  jmp    L24
L41:
  mov    -0x38(%rbp),%rax
  add    $0x10,%rax
  mov    (%rax),%edx
  mov    -0x1c(%rbp),%eax
  add    %edx,%eax
  sub    $0x2,%eax
  cltd
  idivl  -0x2c(%rbp)
  mov    %edx,%eax
  add    $0x1,%eax
  mov    %eax,-0xc(%rbp)
  mov    -0xc(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x28(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  mov    -0x20(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    %edx,-0x20(%rbp)
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x8(%rbp),%rax
  add    %rax,%rdx
  mov    (%rcx),%eax
  mov    %eax,(%rdx)
  addl   $0x1,-0x1c(%rbp)
L24:
  mov    -0x1c(%rbp),%eax
  cmp    -0x14(%rbp),%eax
  jle    L41
  movl   $0x1,-0x1c(%rbp)
  jmp    L34
L25:
  mov    -0x38(%rbp),%rax
  add    $0x18,%rax
  mov    (%rax),%edx
  mov    -0x1c(%rbp),%eax
  add    %edx,%eax
  sub    $0x2,%eax
  cltd
  idivl  -0x2c(%rbp)
  mov    %edx,%eax
  add    $0x1,%eax
  mov    %eax,-0xc(%rbp)
  mov    -0xc(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x28(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  mov    -0x20(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    %edx,-0x20(%rbp)
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x8(%rbp),%rax
  add    %rax,%rdx
  mov    (%rcx),%eax
  mov    %eax,(%rdx)
  addl   $0x1,-0x1c(%rbp)
L34:
  mov    -0x1c(%rbp),%eax
  cmp    -0x10(%rbp),%eax
  jle    L25
  movl   $0x1,-0x1c(%rbp)
  jmp    L7
L42:
  mov    -0x1c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    -0x1c(%rbp),%edx
  movslq %edx,%rdx
  lea    0x0(,%rdx,4),%rcx
  mov    -0x28(%rbp),%rdx
  add    %rcx,%rdx
  mov    (%rax),%eax
  mov    %eax,(%rdx)
  addl   $0x1,-0x1c(%rbp)
L7:
  mov    -0x1c(%rbp),%eax
  cmp    -0x2c(%rbp),%eax
  jle    L42
  mov    -0x2c(%rbp),%edx
  mov    -0x8(%rbp),%rax
  mov    $0x1,%esi
  mov    %rax,%rdi
  call   <free_ivector@plt>
  nop
  leave
  ret
```

assistant: ```c
void trnspt(int iorder[], int ncity, int n[]) {
  int m1, m2, m3, nn, j, jj, *jorder;
  jorder = ivector(1, ncity);
  m1 = 1 + ((n[2] - n[1] + ncity) % ncity);
  m2 = 1 + ((n[5] - n[4] + ncity) % ncity);
  m3 = 1 + ((n[3] - n[6] + ncity) % ncity);
  nn = 1;
  for (j = 1; j <= m1; j++) {
    jj = 1 + ((j + n[1] - 2) % ncity);
    jorder[nn++] = iorder[jj];
  }
  for (j = 1; j <= m2; j++) {
    jj = 1 + ((j + n[4] - 2) % ncity);
    jorder[nn++] = iorder[jj];
  }
  for (j = 1; j <= m3; j++) {
    jj = 1 + ((j + n[6] - 2) % ncity);
    jorder[nn++] = iorder[jj];
  }
  for (j = 1; j <= ncity; j++)
    iorder[j] = jorder[j];
  free_ivector(jorder, 1, ncity);
}
```