// File: /workspace/github_c_makefile_star2_O1/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 0x1d60(%rip), %xmm0     # 0x6e80
movl %edi, %ebp
cvtsd2ss %xmm0, %xmm0
movss %xmm0, (%rsp)
cvtss2sd %xmm0, %xmm0
movsd %xmm0, 0x8(%rsp)
callq 0x11e0
movsd %xmm0, 0x18(%rsp)
movsd 0x8(%rsp), %xmm0
callq 0x10e0
movsd %xmm0, 0x8(%rsp)
movss (%rsp), %xmm0
addss %xmm0, %xmm0
cvtss2sd %xmm0, %xmm0
movsd %xmm0, 0x10(%rsp)
callq 0x11e0
movsd %xmm0, (%rsp)
movsd 0x10(%rsp), %xmm0
callq 0x10e0
cvtsd2ss %xmm0, %xmm0
movl %ebp, %edx
testl %ebp, %ebp
jle 0x51f2
movq 0x48(%r14), %rax
movq (%r14), %rcx
movq 0x30(%r14), %rsi
movq (%rbx), %rdi
xorl %r8d, %r8d
movsd 0x186c(%rip), %xmm1     # 0x6a08
movsd 0x1d04(%rip), %xmm2     # 0x6ea8
movss 0x1d0c(%rip), %xmm3     # 0x6eb8
xorps %xmm4, %xmm4
cvtss2sd (%rax,%r8,4), %xmm4
divsd %xmm1, %xmm4
xorps %xmm5, %xmm5
cvtss2sd (%rcx,%r8,4), %xmm5
divsd %xmm2, %xmm5
addsd %xmm4, %xmm5
movss (%rsi,%r8,4), %xmm4
mulss %xmm0, %xmm4
mulss %xmm3, %xmm4
cvtss2sd %xmm4, %xmm4
addsd %xmm5, %xmm4
cvtsd2ss %xmm4, %xmm4
movss %xmm4, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x51ac
testl %ebp, %ebp
jle 0x5267
movq 0x50(%r14), %rax
movq 0x8(%r14), %rcx
movq 0x38(%r14), %rsi
movq 0x8(%rbx), %rdi
xorl %r8d, %r8d
movsd 0x17f7(%rip), %xmm1     # 0x6a08
movsd 0x1c8f(%rip), %xmm2     # 0x6ea8
movss 0x1c97(%rip), %xmm3     # 0x6eb8
xorps %xmm4, %xmm4
cvtss2sd (%rax,%r8,4), %xmm4
divsd %xmm1, %xmm4
xorps %xmm5, %xmm5
cvtss2sd (%rcx,%r8,4), %xmm5
divsd %xmm2, %xmm5
addsd %xmm4, %xmm5
movss (%rsi,%r8,4), %xmm4
mulss %xmm0, %xmm4
mulss %xmm3, %xmm4
cvtss2sd %xmm4, %xmm4
addsd %xmm5, %xmm4
cvtsd2ss %xmm4, %xmm4
movss %xmm4, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x5221
xorps %xmm1, %xmm1
cvtsd2ss (%rsp), %xmm1
testl %ebp, %ebp
jle 0x529f
movq 0x40(%r14), %rax
movq 0x10(%rbx), %rcx
xorl %esi, %esi
movss 0x1c33(%rip), %xmm2     # 0x6eb8
movss (%rax,%rsi,4), %xmm3
mulss %xmm1, %xmm3
mulss %xmm2, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x5285
testl %ebp, %ebp
jle 0x52cd
movq 0x30(%r14), %rax
movq 0x18(%rbx), %rcx
xorl %esi, %esi
movaps 0xd5c(%rip), %xmm2      # 0x6010
movss (%rax,%rsi,4), %xmm3
xorps %xmm2, %xmm3
mulss %xmm1, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x52b4
testl %ebp, %ebp
jle 0x52fb
movq 0x38(%r14), %rax
movq 0x20(%rbx), %rcx
xorl %esi, %esi
movaps 0xd2e(%rip), %xmm2      # 0x6010
movss (%rax,%rsi,4), %xmm3
xorps %xmm2, %xmm3
mulss %xmm1, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x52e2
testl %ebp, %ebp
jle 0x531f
movq 0x40(%r14), %rax
movq 0x28(%rbx), %rcx
xorl %esi, %esi
movss (%rax,%rsi,4), %xmm1
mulss %xmm0, %xmm1
movss %xmm1, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x5309
xorps %xmm1, %xmm1
cvtsd2ss 0x8(%rsp), %xmm1
testl %ebp, %ebp
jle 0x5356
movq 0x18(%r14), %rax
movq 0x30(%rbx), %rcx
xorl %esi, %esi
movaps 0xcd3(%rip), %xmm2      # 0x6010
movss (%rax,%rsi,4), %xmm3
xorps %xmm2, %xmm3
mulss %xmm1, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x533d
testl %ebp, %ebp
jle 0x5384
movq 0x20(%r14), %rax
movq 0x38(%rbx), %rcx
xorl %esi, %esi
movaps 0xca5(%rip), %xmm2      # 0x6010
movss (%rax,%rsi,4), %xmm3
xorps %xmm2, %xmm3
mulss %xmm1, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x536b
xorps %xmm2, %xmm2
cvtsd2ss 0x18(%rsp), %xmm2
testl %ebp, %ebp
jle 0x53bb
movq 0x28(%r14), %rax
movq 0x40(%rbx), %rcx
xorl %esi, %esi
movaps 0xc6e(%rip), %xmm3      # 0x6010
movss (%rax,%rsi,4), %xmm4
xorps %xmm3, %xmm4
mulss %xmm2, %xmm4
movss %xmm4, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x53a2
testl %ebp, %ebp
jle 0x542f
movq 0x48(%r14), %rax
movq (%r14), %rcx
movq 0x30(%r14), %rsi
movq 0x48(%rbx), %rdi
xorl %r8d, %r8d
movsd 0x162f(%rip), %xmm3     # 0x6a08
movsd 0x1ac7(%rip), %xmm4     # 0x6ea8
movss 0x15ff(%rip), %xmm5     # 0x69e8
xorps %xmm6, %xmm6
cvtss2sd (%rax,%r8,4), %xmm6
divsd %xmm3, %xmm6
xorps %xmm7, %xmm7
cvtss2sd (%rcx,%r8,4), %xmm7
divsd %xmm4, %xmm7
addsd %xmm6, %xmm7
movss (%rsi,%r8,4), %xmm6
mulss %xmm0, %xmm6
mulss %xmm5, %xmm6
cvtss2sd %xmm6, %xmm6
addsd %xmm7, %xmm6
cvtsd2ss %xmm6, %xmm6
movss %xmm6, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x53e9
testl %ebp, %ebp
jle 0x54a4
movq 0x50(%r14), %rax
movq 0x8(%r14), %rcx
movq 0x38(%r14), %rsi
movq 0x50(%rbx), %rdi
xorl %r8d, %r8d
movsd 0x15ba(%rip), %xmm3     # 0x6a08
movsd 0x1a52(%rip), %xmm4     # 0x6ea8
movss 0x158a(%rip), %xmm5     # 0x69e8
xorps %xmm6, %xmm6
cvtss2sd (%rax,%r8,4), %xmm6
divsd %xmm3, %xmm6
xorps %xmm7, %xmm7
cvtss2sd (%rcx,%r8,4), %xmm7
divsd %xmm4, %xmm7
addsd %xmm6, %xmm7
movss (%rsi,%r8,4), %xmm6
mulss %xmm0, %xmm6
mulss %xmm5, %xmm6
cvtss2sd %xmm6, %xmm6
addsd %xmm7, %xmm6
cvtsd2ss %xmm6, %xmm6
movss %xmm6, (%rdi,%r8,4)
incq %r8
cmpq %r8, %rdx
jne 0x545e
testl %ebp, %ebp
jle 0x54ce
movq 0x10(%rbx), %rax
movq 0x58(%rbx), %rcx
xorl %esi, %esi
movaps 0xb57(%rip), %xmm0      # 0x6010
movss (%rax,%rsi,4), %xmm3
xorps %xmm0, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x54b9
testl %ebp, %ebp
jle 0x54fc
movq 0x18(%r14), %rax
movq 0x60(%rbx), %rcx
xorl %esi, %esi
movaps 0xb2d(%rip), %xmm0      # 0x6010
movss (%rax,%rsi,4), %xmm3
xorps %xmm0, %xmm3
mulss %xmm2, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x54e3
testl %ebp, %ebp
jle 0x552a
movq 0x20(%r14), %rax
movq 0x68(%rbx), %rcx
xorl %esi, %esi
movaps 0xaff(%rip), %xmm0      # 0x6010
movss (%rax,%rsi,4), %xmm3
xorps %xmm0, %xmm3
mulss %xmm2, %xmm3
movss %xmm3, (%rcx,%rsi,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x5511
testl %ebp, %ebp
jle 0x554e
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 0x5538
testl %ebp, %ebp
jle 0x5582
movq (%r14), %rax
movq 0x48(%r14), %rcx
movq 0x78(%rbx), %rsi
xorl %edi, %edi
movss 0x194d(%rip), %xmm0     # 0x6eb4
movss (%rcx,%rdi,4), %xmm1
addss (%rax,%rdi,4), %xmm1
divss %xmm0, %xmm1
movss %xmm1, (%rsi,%rdi,4)
incq %rdi
cmpq %rdi, %rdx
jne 0x5567
testl %ebp, %ebp
jle 0x55ba
movq 0x8(%r14), %rax
movq 0x50(%r14), %rcx
movq 0x80(%rbx), %rsi
xorl %edi, %edi
movss 0x1915(%rip), %xmm0     # 0x6eb4
movss (%rcx,%rdi,4), %xmm1
addss (%rax,%rdi,4), %xmm1
divss %xmm0, %xmm1
movss %xmm1, (%rsi,%rdi,4)
incq %rdi
cmpq %rdi, %rdx
jne 0x559f
testl %ebp, %ebp
jle 0x55d8
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