// File: /workspace/github_c_makefile_star2_O3/YunyiQian[P]multitel3/radiats.c
// Function: fk2mtg
void fk2mtg(float az, int npt, float *fk[12], float *mt[18]) {
  int i;
  float sa, ca, sa2, ca2;
  az = az*DEG2RAD;
  sa = sin(az); ca = cos(az);
  sa2 = sin(2*az); ca2 = cos(2*az);
  // mxx.zr = EX/3-DD/6-SS*cos2Az/2
  for(i=0;i<npt;i++) mt[0][i] =  fk[9][i]/3. - fk[0][i]/6. - fk[6][i]*ca2/2;
  for(i=0;i<npt;i++) mt[1][i] = fk[10][i]/3. - fk[1][i]/6. - fk[7][i]*ca2/2;
  // mxx.t = -SS*sin2Az/2
  for(i=0;i<npt;i++) mt[2][i] = -fk[8][i]*sa2/2;
  // mxy.zr = -SS*sin2Az
  for(i=0;i<npt;i++) mt[3][i] = -fk[6][i]*sa2;
  for(i=0;i<npt;i++) mt[4][i] = -fk[7][i]*sa2;
  // mxy.t =  SS*cos2Az
  for(i=0;i<npt;i++) mt[5][i] = fk[8][i]*ca2;
  // mxz.zr = -DS*cosAz
  for(i=0;i<npt;i++) mt[6][i] = -fk[3][i]*ca;
  for(i=0;i<npt;i++) mt[7][i] = -fk[4][i]*ca;
  // mxz.t = -DS*sinAz
  for(i=0;i<npt;i++) mt[8][i] = -fk[5][i]*sa;
  // myy.zr = Ex/3-DD/6+SS*cos2Az/2
  for(i=0;i<npt;i++) mt[9][i]  =  fk[9][i]/3. - fk[0][i]/6. + fk[6][i]*ca2/2;
  for(i=0;i<npt;i++) mt[10][i] = fk[10][i]/3. - fk[1][i]/6. + fk[7][i]*ca2/2;
  // myy.t = -mxx.t
  for(i=0;i<npt;i++) mt[11][i] = -mt[2][i];
  // myz.zr = -DS*sinAz
  for(i=0;i<npt;i++) mt[12][i] = -fk[3][i]*sa;
  for(i=0;i<npt;i++) mt[13][i] = -fk[4][i]*sa;
  // myz.t =  DS*cosAz
  for(i=0;i<npt;i++) mt[14][i] = fk[5][i]*ca;
  // mzz.zr = Ex/3+DD/3
  for(i=0;i<npt;i++) mt[15][i] =  (fk[9][i] + fk[0][i])/3.;
  for(i=0;i<npt;i++) mt[16][i] = (fk[10][i] + fk[1][i])/3.;
  // mzz.t = 0
  for(i=0;i<npt;i++) mt[17][i] = 0.;
  return;
}

// Assembly:
pushq %rbp
pushq %r14
pushq %rbx
subq $0x20, %rsp
movq %rdx, %rbx
movq %rsi, %r14
cvtss2sd %xmm0, %xmm0
mulsd 0x1ca4(%rip), %xmm0     # 0x6ef0
movl %edi, %ebp
cvtsd2ss %xmm0, %xmm0
movss %xmm0, 0x8(%rsp)
cvtss2sd %xmm0, %xmm0
movsd %xmm0, (%rsp)
callq 0x11e0
movsd %xmm0, 0x18(%rsp)
movsd (%rsp), %xmm0
callq 0x10e0
movsd %xmm0, (%rsp)
movss 0x8(%rsp), %xmm0
addss %xmm0, %xmm0
cvtss2sd %xmm0, %xmm0
movsd %xmm0, 0x8(%rsp)
callq 0x11e0
movsd %xmm0, 0x10(%rsp)
movsd 0x8(%rsp), %xmm0
callq 0x10e0
testl %ebp, %ebp
jle 0x56ca
cvtsd2ss 0x18(%rsp), %xmm2
cvtsd2ss (%rsp), %xmm1
cvtsd2ss 0x10(%rsp), %xmm5
cvtsd2ss %xmm0, %xmm0
movq 0x48(%r14), %rax
movq (%r14), %rcx
movq 0x30(%r14), %rsi
movq (%rbx), %rdi
movl %ebp, %edx
xorl %r8d, %r8d
movapd 0x1c53(%rip), %xmm3     # 0x6f30
movss 0x1c63(%rip), %xmm4     # 0x6f48
movss (%rcx,%r8,4), %xmm6
movss (%rax,%r8,4), %xmm7
unpcklps %xmm6, %xmm7            # xmm7 = xmm7[0],xmm6[0],xmm7[1],xmm6[1]
cvtps2pd %xmm7, %xmm6
divpd %xmm3, %xmm6
movapd %xmm6, %xmm7
unpckhpd %xmm6, %xmm7            # xmm7 = xmm7[1],xmm6[1]
subsd %xmm7, %xmm6
movss (%rsi,%r8,4), %xmm7
mulss %xmm0, %xmm7
mulss %xmm4, %xmm7
cvtss2sd %xmm7, %xmm7
addsd %xmm6, %xmm7
xorps %xmm6, %xmm6
cvtsd2ss %xmm7, %xmm6
movss %xmm6, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x52e5
testl %ebp, %ebp
jle 0x56ca
movq 0x50(%r14), %rax
movq 0x8(%r14), %rcx
movq 0x38(%r14), %rsi
movq 0x8(%rbx), %rdi
xorl %r8d, %r8d
movss (%rcx,%r8,4), %xmm6
movss (%rax,%r8,4), %xmm7
unpcklps %xmm6, %xmm7            # xmm7 = xmm7[0],xmm6[0],xmm7[1],xmm6[1]
cvtps2pd %xmm7, %xmm6
divpd %xmm3, %xmm6
movapd %xmm6, %xmm7
unpckhpd %xmm6, %xmm7            # xmm7 = xmm7[1],xmm6[1]
subsd %xmm7, %xmm6
movss (%rsi,%r8,4), %xmm7
mulss %xmm0, %xmm7
mulss %xmm4, %xmm7
cvtss2sd %xmm7, %xmm7
addsd %xmm6, %xmm7
xorps %xmm6, %xmm6
cvtsd2ss %xmm7, %xmm6
movss %xmm6, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x534d
testl %ebp, %ebp
jle 0x56ca
movq 0x40(%r14), %rax
movq 0x10(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm6
mulss %xmm5, %xmm6
mulss %xmm4, %xmm6
movss %xmm6, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x53ac
testl %ebp, %ebp
jle 0x56ca
movq 0x30(%r14), %rax
movq 0x18(%rbx), %rcx
xorl %esi, %esi
movaps 0xc31(%rip), %xmm4      # 0x6010
movss (%rax,%rsi,4), %xmm6
xorps %xmm4, %xmm6
mulss %xmm5, %xmm6
movss %xmm6, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x53df
testl %ebp, %ebp
jle 0x56ca
movq 0x38(%r14), %rax
movq 0x20(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm6
xorps %xmm4, %xmm6
mulss %xmm5, %xmm6
movss %xmm6, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x540a
testl %ebp, %ebp
jle 0x56ca
movq 0x40(%r14), %rax
movq 0x28(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm5
mulss %xmm0, %xmm5
movss %xmm5, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x5435
testl %ebp, %ebp
jle 0x56ca
movq 0x18(%r14), %rax
movq 0x30(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm5
xorps %xmm4, %xmm5
mulss %xmm1, %xmm5
movss %xmm5, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x545d
testl %ebp, %ebp
jle 0x56ca
movq 0x20(%r14), %rax
movq 0x38(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm5
xorps %xmm4, %xmm5
mulss %xmm1, %xmm5
movss %xmm5, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x5488
testl %ebp, %ebp
jle 0x56ca
movq 0x28(%r14), %rax
movq 0x40(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm5
xorps %xmm4, %xmm5
mulss %xmm2, %xmm5
movss %xmm5, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x54b3
testl %ebp, %ebp
jle 0x56ca
movq 0x48(%r14), %rax
movq (%r14), %rcx
movq 0x30(%r14), %rsi
movq 0x48(%rbx), %rdi
xorl %r8d, %r8d
movss 0x155a(%rip), %xmm5     # 0x6a48
movss (%rcx,%r8,4), %xmm6
movss (%rax,%r8,4), %xmm7
unpcklps %xmm6, %xmm7            # xmm7 = xmm7[0],xmm6[0],xmm7[1],xmm6[1]
cvtps2pd %xmm7, %xmm6
divpd %xmm3, %xmm6
movapd %xmm6, %xmm7
unpckhpd %xmm6, %xmm7            # xmm7 = xmm7[1],xmm6[1]
subsd %xmm7, %xmm6
movss (%rsi,%r8,4), %xmm7
mulss %xmm0, %xmm7
mulss %xmm5, %xmm7
cvtss2sd %xmm7, %xmm7
addsd %xmm6, %xmm7
xorps %xmm6, %xmm6
cvtsd2ss %xmm7, %xmm6
movss %xmm6, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x54ee
testl %ebp, %ebp
jle 0x56ca
movq 0x50(%r14), %rax
movq 0x8(%r14), %rcx
movq 0x38(%r14), %rsi
movq 0x50(%rbx), %rdi
xorl %r8d, %r8d
movss (%rcx,%r8,4), %xmm6
movss (%rax,%r8,4), %xmm7
unpcklps %xmm6, %xmm7            # xmm7 = xmm7[0],xmm6[0],xmm7[1],xmm6[1]
cvtps2pd %xmm7, %xmm6
divpd %xmm3, %xmm6
movapd %xmm6, %xmm7
unpckhpd %xmm6, %xmm7            # xmm7 = xmm7[1],xmm6[1]
subsd %xmm7, %xmm6
movss (%rsi,%r8,4), %xmm7
mulss %xmm0, %xmm7
mulss %xmm5, %xmm7
cvtss2sd %xmm7, %xmm7
addsd %xmm6, %xmm7
xorps %xmm6, %xmm6
cvtsd2ss %xmm7, %xmm6
movss %xmm6, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x5556
testl %ebp, %ebp
jle 0x56ca
movq 0x10(%rbx), %rax
movq 0x58(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm0
xorps %xmm4, %xmm0
movss %xmm0, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x55b5
testl %ebp, %ebp
jle 0x56ca
movq 0x18(%r14), %rax
movq 0x60(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm0
xorps %xmm4, %xmm0
mulss %xmm2, %xmm0
movss %xmm0, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x55dc
testl %ebp, %ebp
jle 0x56ca
movq 0x20(%r14), %rax
movq 0x68(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm0
xorps %xmm4, %xmm0
mulss %xmm2, %xmm0
movss %xmm0, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x5607
testl %ebp, %ebp
jle 0x56ca
movq 0x28(%r14), %rax
movq 0x70(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm0
mulss %xmm1, %xmm0
movss %xmm0, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x5632
testl %ebp, %ebp
jle 0x56ca
movq (%r14), %rax
movq 0x48(%r14), %rcx
movq 0x78(%rbx), %rsi
xorl %edi, %edi
movss 0x18e3(%rip), %xmm0     # 0x6f44
movss (%rcx,%rdi,4), %xmm1
addss (%rax,%rdi,4), %xmm1
divss %xmm0, %xmm1
movss %xmm1, (%rsi,%rdi,4)
incq %rdi
cmpq %rdi, %rdx
jne 0x5661
testl %ebp, %ebp
jle 0x56ca
movq 0x8(%r14), %rax
movq 0x50(%r14), %rcx
movq 0x80(%rbx), %rsi
xorl %edi, %edi
movss (%rcx,%rdi,4), %xmm1
addss (%rax,%rdi,4), %xmm1
divss %xmm0, %xmm1
movss %xmm1, (%rsi,%rdi,4)
incq %rdi
cmpq %rdi, %rdx
jne 0x5691
testl %ebp, %ebp
jle 0x56ca
movq 0x88(%rbx), %rdi
shlq $0x2, %rdx
xorl %esi, %esi
addq $0x20, %rsp
popq %rbx
popq %r14
popq %rbp
jmp 0x10d0
addq $0x20, %rsp
popq %rbx
popq %r14
popq %rbp
retq