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

```asm
<putWAG>:
  endbr64
  push   %rbx
  sub    $0x1000,%rsp
  orq    $0x0,(%rsp)
  sub    $0x910,%rsp
  mov    %rdi,%r9
  mov    %fs:0x28,%rax
  mov    %rax,0x1908(%rsp)
  xor    %eax,%eax
  mov    D479(%rip),%rax
  mov    %rax,0xd20(%rsp)
  mov    D481(%rip),%rax
  mov    %rax,0xdc0(%rsp)
  mov    D1366(%rip),%rax
  mov    %rax,0xdc8(%rsp)
  mov    D850(%rip),%rax
  mov    %rax,0xe60(%rsp)
  mov    D1660(%rip),%rax
  mov    %rax,0xe68(%rsp)
  mov    D166(%rip),%rax
  mov    %rax,0xe70(%rsp)
  mov    D1701(%rip),%rax
  mov    %rax,0xf00(%rsp)
  mov    D1720(%rip),%rax
  mov    %rax,0xf08(%rsp)
  mov    D1477(%rip),%rax
  mov    %rax,0xf10(%rsp)
  mov    D1885(%rip),%rax
  mov    %rax,0xf18(%rsp)
  mov    D532(%rip),%rax
  mov    %rax,0xfa0(%rsp)
  mov    D637(%rip),%rax
  mov    %rax,0xfa8(%rsp)
  mov    D1297(%rip),%rax
  mov    %rax,0xfb0(%rsp)
  mov    D1672(%rip),%rax
  mov    %rax,0xfb8(%rsp)
  mov    D40(%rip),%rax
  mov    %rax,0xfc0(%rsp)
  mov    D1567(%rip),%rax
  mov    %rax,0x1040(%rsp)
  mov    D1325(%rip),%rax
  mov    %rax,0x1048(%rsp)
  mov    D1194(%rip),%rax
  mov    %rax,0x1050(%rsp)
  mov    D472(%rip),%rax
  mov    %rax,0x1058(%rsp)
  mov    D1446(%rip),%rax
  mov    %rax,0x1060(%rsp)
  mov    D1415(%rip),%rax
  mov    %rax,0x1068(%rsp)
  mov    D917(%rip),%rax
  mov    %rax,0x10e0(%rsp)
  mov    D364(%rip),%rax
  mov    %rax,0x10e8(%rsp)
  mov    D1097(%rip),%rax
  mov    %rax,0x10f0(%rsp)
  mov    D498(%rip),%rax
  mov    %rax,0x10f8(%rsp)
  mov    D1014(%rip),%rax
  mov    %rax,0x1100(%rsp)
  mov    D701(%rip),%rax
  mov    %rax,0x1108(%rsp)
  mov    D1592(%rip),%rax
  mov    %rax,0x1110(%rsp)
  mov    D1502(%rip),%rax
  mov    %rax,0x1180(%rsp)
  mov    D717(%rip),%rax
  mov    %rax,0x1188(%rsp)
  mov    D876(%rip),%rax
  mov    %rax,0x1190(%rsp)
  mov    D1462(%rip),%rax
  mov    %rax,0x1198(%rsp)
  mov    D316(%rip),%rax
  mov    %rax,0x11a0(%rsp)
  mov    D1468(%rip),%rax
  mov    %rax,0x11a8(%rsp)
  mov    D35(%rip),%rax
  mov    %rax,0x11b0(%rsp)
  mov    D923(%rip),%rax
  mov    %rax,0x11b8(%rsp)
  mov    D982(%rip),%rax
  mov    %rax,0x1220(%rsp)
  mov    D162(%rip),%rax
  mov    %rax,0x1228(%rsp)
  mov    D1652(%rip),%rax
  mov    %rax,0x1230(%rsp)
  mov    D1541(%rip),%rax
  mov    %rax,0x1238(%rsp)
  mov    D1364(%rip),%rax
  mov    %rax,0x1240(%rsp)
  mov    D1051(%rip),%rax
  mov    %rax,0x1248(%rsp)
  mov    D841(%rip),%rax
  mov    %rax,0x1250(%rsp)
  mov    D712(%rip),%rax
  mov    %rax,0x1258(%rsp)
  mov    D1321(%rip),%rax
  mov    %rax,0x1260(%rsp)
  mov    D1566(%rip),%rax
  mov    %rax,0x12c0(%rsp)
  mov    D31(%rip),%rax
  mov    %rax,0x12c8(%rsp)
  mov    D713(%rip),%rax
  mov    %rax,0x12d0(%rsp)
  mov    D1633(%rip),%rax
  mov    %rax,0x12d8(%rsp)
  mov    D927(%rip),%rax
  mov    %rax,0x12e0(%rsp)
  mov    D597(%rip),%rax
  mov    %rax,0x12e8(%rsp)
  mov    D865(%rip),%rax
  mov    %rax,0x12f0(%rsp)
  mov    D241(%rip),%rax
  mov    %rax,0x12f8(%rsp)
  mov    D1299(%rip),%rax
  mov    %rax,0x1300(%rsp)
  mov    D1221(%rip),%rax
  mov    %rax,0x1308(%rsp)
  mov    D147(%rip),%rax
  mov    %rax,0x1360(%rsp)
  mov    D1561(%rip),%rax
  mov    %rax,0x1368(%rsp)
  mov    D1295(%rip),%rax
  mov    %rax,0x1370(%rsp)
  mov    D1433(%rip),%rax
  mov    %rax,0x1378(%rsp)
  mov    D612(%rip),%rax
  mov    %rax,0x1380(%rsp)
  mov    D1006(%rip),%rax
  mov    %rax,0x1388(%rsp)
  mov    D439(%rip),%rax
  mov    %rax,0x1390(%rsp)
  mov    D690(%rip),%rax
  mov    %rax,0x1398(%rsp)
  mov    D215(%rip),%rax
  mov    %rax,0x13a0(%rsp)
  mov    D1581(%rip),%rax
  mov    %rax,0x13a8(%rsp)
  mov    D1817(%rip),%rax
  mov    %rax,0x13b0(%rsp)
  mov    D389(%rip),%rax
  mov    %rax,0x1400(%rsp)
  mov    D660(%rip),%rax
  mov    %rax,0x1408(%rsp)
  mov    D546(%rip),%rax
  mov    %rax,0x1410(%rsp)
  mov    D402(%rip),%rax
  mov    %rax,0x1418(%rsp)
  mov    D326(%rip),%rax
  mov    %rax,0x1420(%rsp)
  mov    D1546(%rip),%rax
  mov    %rax,0x1428(%rsp)
  mov    D603(%rip),%rax
  mov    %rax,0x1430(%rsp)
  mov    D1362(%rip),%rax
  mov    %rax,0x1438(%rsp)
  mov    D1232(%rip),%rax
  mov    %rax,0x1440(%rsp)
  mov    D1497(%rip),%rax
  mov    %rax,0x1448(%rsp)
  mov    D1145(%rip),%rax
  mov    %rax,0x1450(%rsp)
  mov    D313(%rip),%rax
  mov    %rax,0x1458(%rsp)
  mov    D1760(%rip),%rax
  mov    %rax,0x14a0(%rsp)
  mov    D1200(%rip),%rax
  mov    %rax,0x14a8(%rsp)
  mov    D1236(%rip),%rax
  mov    %rax,0x14b0(%rsp)
  mov    D735(%rip),%rax
  mov    %rax,0x14b8(%rsp)
  mov    D258(%rip),%rax
  mov    %rax,0x14c0(%rsp)
  mov    D1483(%rip),%rax
  mov    %rax,0x14c8(%rsp)
  mov    D1480(%rip),%rax
  mov    %rax,0x14d0(%rsp)
  mov    D908(%rip),%rax
  mov    %rax,0x14d8(%rsp)
  mov    D1378(%rip),%rax
  mov    %rax,0x14e0(%rsp)
  mov    D525(%rip),%rax
  mov    %rax,0x14e8(%rsp)
  mov    D1324(%rip),%rax
  mov    %rax,0x14f0(%rsp)
  mov    D1301(%rip),%rax
  mov    %rax,0x14f8(%rsp)
  mov    D818(%rip),%rax
  mov    %rax,0x1500(%rsp)
  mov    D1149(%rip),%rax
  mov    %rax,0x1540(%rsp)
  mov    D1786(%rip),%rax
  mov    %rax,0x1548(%rsp)
  mov    D1758(%rip),%rax
  mov    %rax,0x1550(%rsp)
  mov    D972(%rip),%rax
  mov    %rax,0x1558(%rsp)
  mov    D19(%rip),%rax
  mov    %rax,0x1560(%rsp)
  mov    D1708(%rip),%rax
  mov    %rax,0x1568(%rsp)
  mov    D1418(%rip),%rax
  mov    %rax,0x1570(%rsp)
  mov    D301(%rip),%rax
  mov    %rax,0x1578(%rsp)
  mov    D1346(%rip),%rax
  mov    %rax,0x1580(%rsp)
  mov    D299(%rip),%rax
  mov    %rax,0x1588(%rsp)
  mov    D1048(%rip),%rax
  mov    %rax,0x1590(%rsp)
  mov    D580(%rip),%rax
  mov    %rax,0x1598(%rsp)
  mov    D607(%rip),%rax
  mov    %rax,0x15a0(%rsp)
  mov    D410(%rip),%rax
  mov    %rax,0x15a8(%rsp)
  mov    D792(%rip),%rax
  mov    %rax,0x15e0(%rsp)
  mov    D928(%rip),%rax
  mov    %rax,0x15e8(%rsp)
  mov    D1526(%rip),%rax
  mov    %rax,0x15f0(%rsp)
  mov    D1856(%rip),%rax
  mov    %rax,0x15f8(%rsp)
  mov    D66(%rip),%rax
  mov    %rax,0x1600(%rsp)
  mov    D798(%rip),%rax
  mov    %rax,0x1608(%rsp)
  mov    D70(%rip),%rax
  mov    %rax,0x1610(%rsp)
  mov    D459(%rip),%rax
  mov    %rax,0x1618(%rsp)
  mov    D1137(%rip),%rax
  mov    %rax,0x1620(%rsp)
  mov    D1426(%rip),%rax
  mov    %rax,0x1628(%rsp)
  mov    D74(%rip),%rax
  mov    %rax,0x1630(%rsp)
  mov    D1813(%rip),%rax
  mov    %rax,0x1638(%rsp)
  mov    D1343(%rip),%rax
  mov    %rax,0x1640(%rsp)
  mov    D1379(%rip),%rax
  mov    %rax,0x1648(%rsp)
  mov    D119(%rip),%rax
  mov    %rax,0x1650(%rsp)
  mov    D1085(%rip),%rax
  mov    %rax,0x1680(%rsp)
  mov    D117(%rip),%rax
  mov    %rax,0x1688(%rsp)
  mov    D1482(%rip),%rax
  mov    %rax,0x1690(%rsp)
  mov    D293(%rip),%rax
  mov    %rax,0x1698(%rsp)
  mov    D1789(%rip),%rax
  mov    %rax,0x16a0(%rsp)
  mov    D422(%rip),%rax
  mov    %rax,0x16a8(%rsp)
  mov    D1596(%rip),%rax
  mov    %rax,0x16b0(%rsp)
  mov    D614(%rip),%rax
  mov    %rax,0x16b8(%rsp)
  mov    D1072(%rip),%rax
  mov    %rax,0x16c0(%rsp)
  mov    D1738(%rip),%rax
  mov    %rax,0x16c8(%rsp)
  mov    D205(%rip),%rax
  mov    %rax,0x16d0(%rsp)
  mov    D854(%rip),%rax
  mov    %rax,0x16d8(%rsp)
  mov    D1869(%rip),%rax
  mov    %rax,0x16e0(%rsp)
  mov    D871(%rip),%rax
  mov    %rax,0x16e8(%rsp)
  mov    D451(%rip),%rax
  mov    %rax,0x16f0(%rsp)
  mov    D59(%rip),%rax
  mov    %rax,0x16f8(%rsp)
  mov    D1511(%rip),%rax
  mov    %rax,0x1720(%rsp)
  mov    D618(%rip),%rax
  mov    %rax,0x1728(%rsp)
  mov    D598(%rip),%rax
  mov    %rax,0x1730(%rsp)
  mov    D630(%rip),%rax
  mov    %rax,0x1738(%rsp)
  mov    D259(%rip),%rax
  mov    %rax,0x1740(%rsp)
  mov    D445(%rip),%rax
  mov    %rax,0x1748(%rsp)
  mov    D187(%rip),%rax
  mov    %rax,0x1750(%rsp)
  mov    D490(%rip),%rax
  mov    %rax,0x1758(%rsp)
  mov    D1681(%rip),%rax
  mov    %rax,0x1760(%rsp)
  mov    D441(%rip),%rax
  mov    %rax,0x1768(%rsp)
  mov    D668(%rip),%rax
  mov    %rax,0x1770(%rsp)
  mov    D1211(%rip),%rax
  mov    %rax,0x1778(%rsp)
  mov    D1191(%rip),%rax
  mov    %rax,0x1780(%rsp)
  mov    D1216(%rip),%rax
  mov    %rax,0x1788(%rsp)
  mov    D1798(%rip),%rax
  mov    %rax,0x1790(%rsp)
  mov    D1311(%rip),%rax
  mov    %rax,0x1798(%rsp)
  mov    D1677(%rip),%rax
  mov    %rax,0x17a0(%rsp)
  mov    D412(%rip),%rax
  mov    %rax,0x17c0(%rsp)
  mov    D1333(%rip),%rax
  mov    %rax,0x17c8(%rsp)
  mov    D207(%rip),%rax
  mov    %rax,0x17d0(%rsp)
  mov    D1827(%rip),%rax
  mov    %rax,0x17d8(%rsp)
  mov    D1018(%rip),%rax
  mov    %rax,0x17e0(%rsp)
  mov    D428(%rip),%rax
  mov    %rax,0x17e8(%rsp)
  mov    D1178(%rip),%rax
  mov    %rax,0x17f0(%rsp)
  mov    D1909(%rip),%rax
  mov    %rax,0x17f8(%rsp)
  mov    D1498(%rip),%rax
  mov    %rax,0x1800(%rsp)
  mov    D1473(%rip),%rax
  mov    %rax,0x1808(%rsp)
  mov    D150(%rip),%rax
  mov    %rax,0x1810(%rsp)
  mov    D1258(%rip),%rax
  mov    %rax,0x1818(%rsp)
  mov    D558(%rip),%rax
  mov    %rax,0x1820(%rsp)
  mov    D343(%rip),%rax
  mov    %rax,0x1828(%rsp)
  mov    D550(%rip),%rax
  mov    %rax,0x1830(%rsp)
  mov    D1892(%rip),%rax
  mov    %rax,0x1838(%rsp)
  mov    D586(%rip),%rax
  mov    %rax,0x1840(%rsp)
  mov    D1133(%rip),%rax
  mov    %rax,0x1848(%rsp)
  mov    D1465(%rip),%rax
  mov    %rax,0x1860(%rsp)
  mov    D256(%rip),%rax
  mov    %rax,0x1868(%rsp)
  mov    D529(%rip),%rax
  mov    %rax,0x1870(%rsp)
  mov    D320(%rip),%rax
  mov    %rax,0x1878(%rsp)
  mov    D1434(%rip),%rax
  mov    %rax,0x1880(%rsp)
  mov    D1023(%rip),%rax
  mov    %rax,0x1888(%rsp)
  mov    D1602(%rip),%rax
  mov    %rax,0x1890(%rsp)
  mov    D105(%rip),%rax
  mov    %rax,0x1898(%rsp)
  mov    D144(%rip),%rax
  mov    %rax,0x18a0(%rsp)
  mov    D3(%rip),%rax
  mov    %rax,0x18a8(%rsp)
  mov    D915(%rip),%rax
  mov    %rax,0x18b0(%rsp)
  mov    D1908(%rip),%rax
  mov    %rax,0x18b8(%rsp)
  mov    D1901(%rip),%rax
  mov    %rax,0x18c0(%rsp)
  mov    D819(%rip),%rax
  mov    %rax,0x18c8(%rsp)
  mov    D834(%rip),%rax
  mov    %rax,0x18d0(%rsp)
  mov    D73(%rip),%rax
  mov    %rax,0x18d8(%rsp)
  mov    D484(%rip),%rax
  mov    %rax,0x18e0(%rsp)
  mov    D1128(%rip),%rax
  mov    %rax,0x18e8(%rsp)
  mov    D643(%rip),%rax
  mov    %rax,0x18f0(%rsp)
  mov    %rsp,%rsi
  lea    0xa0(%rsp),%rdi
  lea    0xd20(%rsp),%rcx
  mov    %rdi,%rdx
L61:
  lea    -0xa0(%rdx),%rax
L70:
  movq   $0x0,(%rax)
  add    $0x8,%rax
  cmp    %rdx,%rax
  jne    L70
  add    $0xa0,%rdx
  cmp    %rcx,%rdx
  jne    L61
  lea    0xd20(%rsp),%rbx
  lea    0xc88(%rsp),%r8
  lea    0xd28(%rsp),%rcx
  mov    %r8,%r11
  mov    $0x0,%r10d
  jmp    L186
L94:
  movsd  (%rax),%xmm0
  movsd  %xmm0,(%rdx)
  add    $0x8,%rax
  add    $0xa0,%rdx
  cmp    %rcx,%rax
  jne    L94
L216:
  add    $0xa0,%rbx
  add    $0x8,%r11
  add    $0xa8,%rcx
L186:
  add    $0x1,%r10d
  cmp    $0x14,%r10d
  je     L127
  mov    %r11,%rdx
  mov    %rbx,%rax
  test   %r10d,%r10d
  jg     L94
  jmp    L216
L127:
  mov    %rsi,%rdx
  mov    $0x1,%ecx
  jmp    L208
L23:
  add    $0x1,%rcx
  add    $0xa0,%r8
  add    $0xa0,%rdx
  cmp    $0x14,%rcx
  je     L40
L208:
  cmp    $0x13,%ecx
  jg     L23
  mov    %rcx,%rax
L103:
  movsd  -0x8(%r8,%rax,8),%xmm0
  movsd  %xmm0,(%rdx,%rax,8)
  add    $0x1,%rax
  cmp    $0x13,%eax
  jle    L103
  jmp    L23
L40:
  movsd  D1654(%rip),%xmm1
  divsd  0xbd8(%rsp),%xmm1
  lea    0x8(%rsp),%rcx
  mov    $0x0,%edx
  jmp    L197
L201:
  movsd  (%rsi,%rax,8),%xmm0
  movsd  %xmm0,-0x8(%rdx,%rax,8)
  add    $0x1,%rax
  cmp    $0x13,%eax
  jle    L201
  sub    %r10d,%edi
  lea    0x14(%rdi),%edi
L168:
  add    $0x1,%rcx
  add    $0xa0,%rsi
  sub    $0x8,%r8
  cmp    $0x14,%rcx
  je     L160
L138:
  mov    %ecx,%r10d
  cmp    $0x13,%ecx
  jg     L168
  movslq %edi,%rax
  lea    (%r8,%rax,8),%rdx
  add    %r9,%rdx
  mov    %rcx,%rax
  jmp    L201
L29:
  add    $0xa8,%rcx
  add    $0xa0,%rdi
L197:
  add    $0x1,%edx
  cmp    $0x13,%edx
  jg     L29
  mov    %rcx,%rax
L93:
  movapd %xmm1,%xmm0
  mulsd  (%rax),%xmm0
  movsd  %xmm0,(%rax)
  add    $0x8,%rax
  cmp    %rdi,%rax
  jne    L93
  add    $0xa8,%rcx
  add    $0xa0,%rdi
  cmp    $0x13,%edx
  jne    L197
  mov    $0x0,%r8d
  mov    $0x1,%ecx
  mov    $0x0,%edi
  jmp    L138
L160:
  mov    0x1908(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L60
  add    $0x1910,%rsp
  pop    %rbx
  ret
L60:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: data_tag: D479
type_infered: f64
name: unpack_data
arguments: data_tag: D481
type_infered: f64
name: unpack_data
arguments: data_tag: D1366
type_infered: f64
name: unpack_data
arguments: data_tag: D850
type_infered: f64
name: unpack_data
arguments: data_tag: D1660
type_infered: f64
name: unpack_data
arguments: data_tag: D166
type_infered: f64
name: unpack_data
arguments: data_tag: D1701
type_infered: f64
name: unpack_data
arguments: data_tag: D1720
type_infered: f64
name: unpack_data
arguments: data_tag: D1477
type_infered: f64
name: unpack_data
arguments: data_tag: D1885
type_infered: f64
name: unpack_data
arguments: data_tag: D532
type_infered: f64
name: unpack_data
arguments: data_tag: D637
type_infered: f64
name: unpack_data
arguments: data_tag: D1297
type_infered: f64
name: unpack_data
arguments: data_tag: D1672
type_infered: f64
name: unpack_data
arguments: data_tag: D40
type_infered: f64
name: unpack_data
arguments: data_tag: D1567
type_infered: f64
name: unpack_data
arguments: data_tag: D1325
type_infered: f64
name: unpack_data
arguments: data_tag: D1194
type_infered: f64
name: unpack_data
arguments: data_tag: D472
type_infered: f64
name: unpack_data
arguments: data_tag: D1446
type_infered: f64
name: unpack_data
arguments: data_tag: D1415
type_infered: f64
name: unpack_data
arguments: data_tag: D917
type_infered: f64
name: unpack_data
arguments: data_tag: D364
type_infered: f64
name: unpack_data
arguments: data_tag: D1097
type_infered: f64
name: unpack_data
arguments: data_tag: D498
type_infered: f64
name: unpack_data
arguments: data_tag: D1014
type_infered: f64
name: unpack_data
arguments: data_tag: D701
type_infered: f64
name: unpack_data
arguments: data_tag: D1592
type_infered: f64
name: unpack_data
arguments: data_tag: D1502
type_infered: f64
name: unpack_data
arguments: data_tag: D717
type_infered: f64
name: unpack_data
arguments: data_tag: D876
type_infered: f64
name: unpack_data
arguments: data_tag: D1462
type_infered: f64
name: unpack_data
arguments: data_tag: D316
type_infered: f64
name: unpack_data
arguments: data_tag: D1468
type_infered: f64
name: unpack_data
arguments: data_tag: D35
type_infered: f64
name: unpack_data
arguments: data_tag: D923
type_infered: f64
name: unpack_data
arguments: data_tag: D982
type_infered: f64
name: unpack_data
arguments: data_tag: D162
type_infered: f64
name: unpack_data
arguments: data_tag: D1652
type_infered: f64
name: unpack_data
arguments: data_tag: D1541
type_infered: f64
name: unpack_data
arguments: data_tag: D1364
type_infered: f64
name: unpack_data
arguments: data_tag: D1051
type_infered: f64
name: unpack_data
arguments: data_tag: D841
type_infered: f64
name: unpack_data
arguments: data_tag: D712
type_infered: f64
name: unpack_data
arguments: data_tag: D1321
type_infered: f64
name: unpack_data
arguments: data_tag: D1566
type_infered: f64
name: unpack_data
arguments: data_tag: D31
type_infered: f64
name: unpack_data
arguments: data_tag: D713
type_infered: f64
name: unpack_data
arguments: data_tag: D1633
type_infered: f64
name: unpack_data
arguments: data_tag: D927
type_infered: f64
name: unpack_data
arguments: data_tag: D597
type_infered: f64
name: unpack_data
arguments: data_tag: D865
type_infered: f64
name: unpack_data
arguments: data_tag: D241
type_infered: f64
name: unpack_data
arguments: data_tag: D1299
type_infered: f64
name: unpack_data
arguments: data_tag: D1221
type_infered: f64
name: unpack_data
arguments: data_tag: D147
type_infered: f64
name: unpack_data
arguments: data_tag: D1561
type_infered: f64
name: unpack_data
arguments: data_tag: D1295
type_infered: f64
name: unpack_data
arguments: data_tag: D1433
type_infered: f64
name: unpack_data
arguments: data_tag: D612
type_infered: f64
name: unpack_data
arguments: data_tag: D1006
type_infered: f64
name: unpack_data
arguments: data_tag: D439
type_infered: f64
name: unpack_data
arguments: data_tag: D690
type_infered: f64
name: unpack_data
arguments: data_tag: D215
type_infered: f64
name: unpack_data
arguments: data_tag: D1581
type_infered: f64
name: unpack_data
arguments: data_tag: D1817
type_infered: f64
name: unpack_data
arguments: data_tag: D389
type_infered: f64
name: unpack_data
arguments: data_tag: D660
type_infered: f64
name: unpack_data
arguments: data_tag: D546
type_infered: f64
name: unpack_data
arguments: data_tag: D402
type_infered: f64
name: unpack_data
arguments: data_tag: D326
type_infered: f64
name: unpack_data
arguments: data_tag: D1546
type_infered: f64
name: unpack_data
arguments: data_tag: D603
type_infered: f64
name: unpack_data
arguments: data_tag: D1362
type_infered: f64
name: unpack_data
arguments: data_tag: D1232
type_infered: f64
name: unpack_data
arguments: data_tag: D1497
type_infered: f64
name: unpack_data
arguments: data_tag: D1145
type_infered: f64
name: unpack_data
arguments: data_tag: D313
type_infered: f64
name: unpack_data
arguments: data_tag: D1760
type_infered: f64
name: unpack_data
arguments: data_tag: D1200
type_infered: f64
name: unpack_data
arguments: data_tag: D1236
type_infered: f64
name: unpack_data
arguments: data_tag: D735
type_infered: f64
name: unpack_data
arguments: data_tag: D258
type_infered: f64
name: unpack_data
arguments: data_tag: D1483
type_infered: f64
name: unpack_data
arguments: data_tag: D1480
type_infered: f64
name: unpack_data
arguments: data_tag: D908
type_infered: f64
name: unpack_data
arguments: data_tag: D1378
type_infered: f64
name: unpack_data
arguments: data_tag: D525
type_infered: f64
name: unpack_data
arguments: data_tag: D1324
type_infered: f64
name: unpack_data
arguments: data_tag: D1301
type_infered: f64
name: unpack_data
arguments: data_tag: D818
type_infered: f64
name: unpack_data
arguments: data_tag: D1149
type_infered: f64
name: unpack_data
arguments: data_tag: D1786
type_infered: f64
name: unpack_data
arguments: data_tag: D1758
type_infered: f64
name: unpack_data
arguments: data_tag: D972
type_infered: f64
name: unpack_data
arguments: data_tag: D19
type_infered: f64
name: unpack_data
arguments: data_tag: D1708
type_infered: f64
name: unpack_data
arguments: data_tag: D1418
type_infered: f64
name: unpack_data
arguments: data_tag: D301
type_infered: f64
name: unpack_data
arguments: data_tag: D1346
type_infered: f64
name: unpack_data
arguments: data_tag: D299
type_infered: f64
name: unpack_data
arguments: data_tag: D1048
type_infered: f64
name: unpack_data
arguments: data_tag: D580
type_infered: f64
name: unpack_data
arguments: data_tag: D607
type_infered: f64
name: unpack_data
arguments: data_tag: D410
type_infered: f64
name: unpack_data
arguments: data_tag: D792
type_infered: f64
name: unpack_data
arguments: data_tag: D928
type_infered: f64
name: unpack_data
arguments: data_tag: D1526
type_infered: f64
name: unpack_data
arguments: data_tag: D1856
type_infered: f64
name: unpack_data
arguments: data_tag: D66
type_infered: f64
name: unpack_data
arguments: data_tag: D798
type_infered: f64
name: unpack_data
arguments: data_tag: D70
type_infered: f64
name: unpack_data
arguments: data_tag: D459
type_infered: f64
name: unpack_data
arguments: data_tag: D1137
type_infered: f64
name: unpack_data
arguments: data_tag: D1426
type_infered: f64
name: unpack_data
arguments: data_tag: D74
type_infered: f64
name: unpack_data
arguments: data_tag: D1813
type_infered: f64
name: unpack_data
arguments: data_tag: D1343
type_infered: f64
name: unpack_data
arguments: data_tag: D1379
type_infered: f64
name: unpack_data
arguments: data_tag: D119
type_infered: f64
name: unpack_data
arguments: data_tag: D1085
type_infered: f64
name: unpack_data
arguments: data_tag: D117
type_infered: f64
name: unpack_data
arguments: data_tag: D1482
type_infered: f64
name: unpack_data
arguments: data_tag: D293
type_infered: f64
name: unpack_data
arguments: data_tag: D1789
type_infered: f64
name: unpack_data
arguments: data_tag: D422
type_infered: f64
name: unpack_data
arguments: data_tag: D1596
type_infered: f64
name: unpack_data
arguments: data_tag: D614
type_infered: f64
name: unpack_data
arguments: data_tag: D1072
type_infered: f64
name: unpack_data
arguments: data_tag: D1738
type_infered: f64
name: unpack_data
arguments: data_tag: D205
type_infered: f64
name: unpack_data
arguments: data_tag: D854
type_infered: f64
name: unpack_data
arguments: data_tag: D1869
type_infered: f64
name: unpack_data
arguments: data_tag: D871
type_infered: f64
name: unpack_data
arguments: data_tag: D451
type_infered: f64
name: unpack_data
arguments: data_tag: D59
type_infered: f64
name: unpack_data
arguments: data_tag: D1511
type_infered: f64
name: unpack_data
arguments: data_tag: D618
type_infered: f64
name: unpack_data
arguments: data_tag: D598
type_infered: f64
name: unpack_data
arguments: data_tag: D630
type_infered: f64
name: unpack_data
arguments: data_tag: D259
type_infered: f64
name: unpack_data
arguments: data_tag: D445
type_infered: f64
name: unpack_data
arguments: data_tag: D187
type_infered: f64
name: unpack_data
arguments: data_tag: D490
type_infered: f64
name: unpack_data
arguments: data_tag: D1681
type_infered: f64
name: unpack_data
arguments: data_tag: D441
type_infered: f64
name: unpack_data
arguments: data_tag: D668
type_infered: f64
name: unpack_data
arguments: data_tag: D1211
type_infered: f64
name: unpack_data
arguments: data_tag: D1191
type_infered: f64
name: unpack_data
arguments: data_tag: D1216
type_infered: f64
name: unpack_data
arguments: data_tag: D1798
type_infered: f64
name: unpack_data
arguments: data_tag: D1311
type_infered: f64
name: unpack_data
arguments: data_tag: D1677
type_infered: f64
name: unpack_data
arguments: data_tag: D412
type_infered: f64
name: unpack_data
arguments: data_tag: D1333
type_infered: f64
name: unpack_data
arguments: data_tag: D207
type_infered: f64
name: unpack_data
arguments: data_tag: D1827
type_infered: f64
name: unpack_data
arguments: data_tag: D1018
type_infered: f64
name: unpack_data
arguments: data_tag: D428
type_infered: f64
name: unpack_data
arguments: data_tag: D1178
type_infered: f64
name: unpack_data
arguments: data_tag: D1909
type_infered: f64
name: unpack_data
arguments: data_tag: D1498
type_infered: f64
name: unpack_data
arguments: data_tag: D1473
type_infered: f64
name: unpack_data
arguments: data_tag: D150
type_infered: f64
name: unpack_data
arguments: data_tag: D1258
type_infered: f64
name: unpack_data
arguments: data_tag: D558
type_infered: f64
name: unpack_data
arguments: data_tag: D343
type_infered: f64
name: unpack_data
arguments: data_tag: D550
type_infered: f64
name: unpack_data
arguments: data_tag: D1892
type_infered: f64
name: unpack_data
arguments: data_tag: D586
type_infered: f64
name: unpack_data
arguments: data_tag: D1133
type_infered: f64
name: unpack_data
arguments: data_tag: D1465
type_infered: f64
name: unpack_data
arguments: data_tag: D256
type_infered: f64
name: unpack_data
arguments: data_tag: D529
type_infered: f64
name: unpack_data
arguments: data_tag: D320
type_infered: f64
name: unpack_data
arguments: data_tag: D1434
type_infered: f64
name: unpack_data
arguments: data_tag: D1023
type_infered: f64
name: unpack_data
arguments: data_tag: D1602
type_infered: f64
name: unpack_data
arguments: data_tag: D105
type_infered: f64
name: unpack_data
arguments: data_tag: D144
type_infered: f64
name: unpack_data
arguments: data_tag: D3
type_infered: f64
name: unpack_data
arguments: data_tag: D915
type_infered: f64
name: unpack_data
arguments: data_tag: D1908
type_infered: f64
name: unpack_data
arguments: data_tag: D1901
type_infered: f64
name: unpack_data
arguments: data_tag: D819
type_infered: f64
name: unpack_data
arguments: data_tag: D834
type_infered: f64
name: unpack_data
arguments: data_tag: D73
type_infered: f64
name: unpack_data
arguments: data_tag: D484
type_infered: f64
name: unpack_data
arguments: data_tag: D1128
type_infered: f64
name: unpack_data
arguments: data_tag: D643
type_infered: f64
name: unpack_data
arguments: data_tag: D1654
type_infered: f64

tool: D479: 55.1571

tool: D481: 50.9848

tool: D1366: 63.5346

tool: D850: 73.8998

tool: D1660: 14.7304

tool: D166: 542.942

tool: D1701: 102.704

tool: D1720: 52.8191

tool: D1477: 26.5256

tool: D1885: 3.02949

tool: D532: 90.8598

tool: D637: 303.55

tool: D1297: 154.364

tool: D1672: 61.6783

tool: D40: 9.88179

tool: D1567: 158.285

tool: D1325: 43.9157

tool: D1194: 94.7198

tool: D472: 617.416

tool: D1446: 2.1352

tool: D1415: 546.947

tool: D917: 141.672

tool: D364: 58.4665

tool: D1097: 112.556

tool: D498: 86.5584

tool: D1014: 30.6674

tool: D701: 33.0052

tool: D1592: 56.7717

tool: D1502: 31.6954

tool: D717: 213.715

tool: D876: 395.629

tool: D1462: 93.0676

tool: D316: 24.8972

tool: D1468: 429.411

tool: D35: 57.0025

tool: D923: 24.941

tool: D982: 19.3335

tool: D162: 18.6979

tool: D1652: 55.4236

tool: D1541: 3.9437

tool: D1364: 17.0135

tool: D1051: 11.3917

tool: D841: 12.7395

tool: D712: 3.04501

tool: D1321: 13.819

tool: D1566: 39.7915

tool: D31: 49.7671

tool: D713: 13.1528

tool: D1633: 8.48047

tool: D927: 38.4287

tool: D597: 86.9489

tool: D865: 15.4263

tool: D241: 6.13037

tool: D1299: 49.9462

tool: D1221: 317.097

tool: D147: 90.6265

tool: D1561: 535.142

tool: D1295: 301.201

tool: D1433: 47.9855

tool: D612: 7.40339

tool: D1006: 389.49

tool: D439: 258.443

tool: D690: 37.3558

tool: D215: 89.0432

tool: D1581: 32.3832

tool: D1817: 25.7555

tool: D389: 89.3496

tool: D660: 68.3162

tool: D546: 19.8221

tool: D402: 10.3754

tool: D326: 39.0482

tool: D1546: 154.526

tool: D603: 31.5124

tool: D1362: 17.41

tool: D1232: 40.4141

tool: D1497: 425.746

tool: D1145: 485.402

tool: D313: 93.4276

tool: D1760: 21.0494

tool: D1200: 10.2711

tool: D1236: 9.61621

tool: D735: 4.67304

tool: D258: 39.802

tool: D1483: 9.99208

tool: D1480: 8.11339

tool: D908: 4.9931

tool: D1378: 67.9371

tool: D525: 105.947

tool: D1324: 211.517

tool: D1301: 8.8836

tool: D818: 119.063

tool: D1149: 143.855

tool: D1786: 67.9489

tool: D1758: 19.5081

tool: D972: 42.3984

tool: D19: 10.9404

tool: D1708: 93.3372

tool: D1418: 68.2355

tool: D301: 24.357

tool: D1346: 69.6198

tool: D299: 9.99288

tool: D1048: 41.5844

tool: D580: 55.6896

tool: D607: 17.1329

tool: D410: 16.1444

tool: D792: 337.079

tool: D928: 122.419

tool: D1526: 397.423

tool: D1856: 107.176

tool: D66: 140.766

tool: D798: 102.887

tool: D70: 70.4939

tool: D459: 134.182

tool: D1137: 74.0169

tool: D1426: 31.944

tool: D74: 34.4739

tool: D1813: 96.713

tool: D1343: 49.3905

tool: D1379: 54.5931

tool: D119: 161.328

tool: D1085: 212.111

tool: D117: 55.4413

tool: D1482: 203.006

tool: D293: 37.4866

tool: D1789: 51.2984

tool: D422: 85.7928

tool: D1596: 82.2765

tool: D614: 22.5833

tool: D1072: 47.3307

tool: D1738: 145.816

tool: D205: 32.6622

tool: D854: 138.698

tool: D1869: 151.612

tool: D871: 17.1903

tool: D451: 79.5384

tool: D59: 437.802

tool: D1511: 11.3133

tool: D618: 116.392

tool: D598: 7.19167

tool: D630: 12.9767

tool: D259: 71.707

tool: D445: 21.5737

tool: D187: 15.6557

tool: D490: 33.6983

tool: D1681: 26.2569

tool: D441: 21.2483

tool: D668: 66.5309

tool: D1211: 13.7505

tool: D1191: 51.5706

tool: D1216: 152.964

tool: D1798: 13.9405

tool: D1311: 52.3742

tool: D1677: 11.0864

tool: D412: 24.0735

tool: D1333: 38.1533

tool: D207: 108.6

tool: D1827: 32.5711

tool: D1018: 54.3833

tool: D428: 22.771

tool: D1178: 19.6303

tool: D1909: 10.3604

tool: D1498: 387.344

tool: D1473: 42.017

tool: D150: 39.8618

tool: D1258: 13.3264

tool: D558: 42.8437

tool: D343: 645.428

tool: D550: 21.6046

tool: D1892: 78.6993

tool: D586: 29.1148

tool: D1133: 248.539

tool: D1465: 200.601

tool: D256: 25.1849

tool: D529: 19.6246

tool: D320: 15.2335

tool: D1434: 100.214

tool: D1023: 30.1281

tool: D1602: 58.8731

tool: D105: 18.7247

tool: D144: 11.8358

tool: D3: 782.13

tool: D915: 180.034

tool: D1908: 30.5434

tool: D1901: 205.845

tool: D819: 64.9892

tool: D834: 31.4887

tool: D73: 23.2739

tool: D484: 138.823

tool: D1128: 36.5369

tool: D643: 31.473

tool: D1654: 1

assistant: ```c
void putWAG(double *ext_initialRates) {
  double scaler, q[20][20], daa[400];
  int i, j, r;
  daa[1 * 20 + 0] = 55.15710;
  daa[2 * 20 + 0] = 50.98480;
  daa[2 * 20 + 1] = 63.53460;
  daa[3 * 20 + 0] = 73.89980;
  daa[3 * 20 + 1] = 14.73040;
  daa[3 * 20 + 2] = 542.94200;
  daa[4 * 20 + 0] = 102.70400;
  daa[4 * 20 + 1] = 52.81910;
  daa[4 * 20 + 2] = 26.52560;
  daa[4 * 20 + 3] = 3.02949;
  daa[5 * 20 + 0] = 90.85980;
  daa[5 * 20 + 1] = 303.55000;
  daa[5 * 20 + 2] = 154.36400;
  daa[5 * 20 + 3] = 61.67830;
  daa[5 * 20 + 4] = 9.88179;
  daa[6 * 20 + 0] = 158.28500;
  daa[6 * 20 + 1] = 43.91570;
  daa[6 * 20 + 2] = 94.71980;
  daa[6 * 20 + 3] = 617.41600;
  daa[6 * 20 + 4] = 2.13520;
  daa[6 * 20 + 5] = 546.94700;
  daa[7 * 20 + 0] = 141.67200;
  daa[7 * 20 + 1] = 58.46650;
  daa[7 * 20 + 2] = 112.55600;
  daa[7 * 20 + 3] = 86.55840;
  daa[7 * 20 + 4] = 30.66740;
  daa[7 * 20 + 5] = 33.00520;
  daa[7 * 20 + 6] = 56.77170;
  daa[8 * 20 + 0] = 31.69540;
  daa[8 * 20 + 1] = 213.71500;
  daa[8 * 20 + 2] = 395.62900;
  daa[8 * 20 + 3] = 93.06760;
  daa[8 * 20 + 4] = 24.89720;
  daa[8 * 20 + 5] = 429.41100;
  daa[8 * 20 + 6] = 57.00250;
  daa[8 * 20 + 7] = 24.94100;
  daa[9 * 20 + 0] = 19.33350;
  daa[9 * 20 + 1] = 18.69790;
  daa[9 * 20 + 2] = 55.42360;
  daa[9 * 20 + 3] = 3.94370;
  daa[9 * 20 + 4] = 17.01350;
  daa[9 * 20 + 5] = 11.39170;
  daa[9 * 20 + 6] = 12.73950;
  daa[9 * 20 + 7] = 3.04501;
  daa[9 * 20 + 8] = 13.81900;
  daa[10 * 20 + 0] = 39.79150;
  daa[10 * 20 + 1] = 49.76710;
  daa[10 * 20 + 2] = 13.15280;
  daa[10 * 20 + 3] = 8.48047;
  daa[10 * 20 + 4] = 38.42870;
  daa[10 * 20 + 5] = 86.94890;
  daa[10 * 20 + 6] = 15.42630;
  daa[10 * 20 + 7] = 6.13037;
  daa[10 * 20 + 8] = 49.94620;
  daa[10 * 20 + 9] = 317.09700;
  daa[11 * 20 + 0] = 90.62650;
  daa[11 * 20 + 1] = 535.14200;
  daa[11 * 20 + 2] = 301.20100;
  daa[11 * 20 + 3] = 47.98550;
  daa[11 * 20 + 4] = 7.40339;
  daa[11 * 20 + 5] = 389.49000;
  daa[11 * 20 + 6] = 258.44300;
  daa[11 * 20 + 7] = 37.35580;
  daa[11 * 20 + 8] = 89.04320;
  daa[11 * 20 + 9] = 32.38320;
  daa[11 * 20 + 10] = 25.75550;
  daa[12 * 20 + 0] = 89.34960;
  daa[12 * 20 + 1] = 68.31620;
  daa[12 * 20 + 2] = 19.82210;
  daa[12 * 20 + 3] = 10.37540;
  daa[12 * 20 + 4] = 39.04820;
  daa[12 * 20 + 5] = 154.52600;
  daa[12 * 20 + 6] = 31.51240;
  daa[12 * 20 + 7] = 17.41000;
  daa[12 * 20 + 8] = 40.41410;
  daa[12 * 20 + 9] = 425.74600;
  daa[12 * 20 + 10] = 485.40200;
  daa[12 * 20 + 11] = 93.42760;
  daa[13 * 20 + 0] = 21.04940;
  daa[13 * 20 + 1] = 10.27110;
  daa[13 * 20 + 2] = 9.61621;
  daa[13 * 20 + 3] = 4.67304;
  daa[13 * 20 + 4] = 39.80200;
  daa[13 * 20 + 5] = 9.99208;
  daa[13 * 20 + 6] = 8.11339;
  daa[13 * 20 + 7] = 4.99310;
  daa[13 * 20 + 8] = 67.93710;
  daa[13 * 20 + 9] = 105.94700;
  daa[13 * 20 + 10] = 211.51700;
  daa[13 * 20 + 11] = 8.88360;
  daa[13 * 20 + 12] = 119.06300;
  daa[14 * 20 + 0] = 143.85500;
  daa[14 * 20 + 1] = 67.94890;
  daa[14 * 20 + 2] = 19.50810;
  daa[14 * 20 + 3] = 42.39840;
  daa[14 * 20 + 4] = 10.94040;
  daa[14 * 20 + 5] = 93.33720;
  daa[14 * 20 + 6] = 68.23550;
  daa[14 * 20 + 7] = 24.35700;
  daa[14 * 20 + 8] = 69.61980;
  daa[14 * 20 + 9] = 9.99288;
  daa[14 * 20 + 10] = 41.58440;
  daa[14 * 20 + 11] = 55.68960;
  daa[14 * 20 + 12] = 17.13290;
  daa[14 * 20 + 13] = 16.14440;
  daa[15 * 20 + 0] = 337.07900;
  daa[15 * 20 + 1] = 122.41900;
  daa[15 * 20 + 2] = 397.42300;
  daa[15 * 20 + 3] = 107.17600;
  daa[15 * 20 + 4] = 140.76600;
  daa[15 * 20 + 5] = 102.88700;
  daa[15 * 20 + 6] = 70.49390;
  daa[15 * 20 + 7] = 134.18200;
  daa[15 * 20 + 8] = 74.01690;
  daa[15 * 20 + 9] = 31.94400;
  daa[15 * 20 + 10] = 34.47390;
  daa[15 * 20 + 11] = 96.71300;
  daa[15 * 20 + 12] = 49.39050;
  daa[15 * 20 + 13] = 54.59310;
  daa[15 * 20 + 14] = 161.32800;
  daa[16 * 20 + 0] = 212.11100;
  daa[16 * 20 + 1] = 55.44130;
  daa[16 * 20 + 2] = 203.00600;
  daa[16 * 20 + 3] = 37.48660;
  daa[16 * 20 + 4] = 51.29840;
  daa[16 * 20 + 5] = 85.79280;
  daa[16 * 20 + 6] = 82.27650;
  daa[16 * 20 + 7] = 22.58330;
  daa[16 * 20 + 8] = 47.33070;
  daa[16 * 20 + 9] = 145.81600;
  daa[16 * 20 + 10] = 32.66220;
  daa[16 * 20 + 11] = 138.69800;
  daa[16 * 20 + 12] = 151.61200;
  daa[16 * 20 + 13] = 17.19030;
  daa[16 * 20 + 14] = 79.53840;
  daa[16 * 20 + 15] = 437.80200;
  daa[17 * 20 + 0] = 11.31330;
  daa[17 * 20 + 1] = 116.39200;
  daa[17 * 20 + 2] = 7.19167;
  daa[17 * 20 + 3] = 12.97670;
  daa[17 * 20 + 4] = 71.70700;
  daa[17 * 20 + 5] = 21.57370;
  daa[17 * 20 + 6] = 15.65570;
  daa[17 * 20 + 7] = 33.69830;
  daa[17 * 20 + 8] = 26.25690;
  daa[17 * 20 + 9] = 21.24830;
  daa[17 * 20 + 10] = 66.53090;
  daa[17 * 20 + 11] = 13.75050;
  daa[17 * 20 + 12] = 51.57060;
  daa[17 * 20 + 13] = 152.96400;
  daa[17 * 20 + 14] = 13.94050;
  daa[17 * 20 + 15] = 52.37420;
  daa[17 * 20 + 16] = 11.08640;
  daa[18 * 20 + 0] = 24.07350;
  daa[18 * 20 + 1] = 38.15330;
  daa[18 * 20 + 2] = 108.60000;
  daa[18 * 20 + 3] = 32.57110;
  daa[18 * 20 + 4] = 54.38330;
  daa[18 * 20 + 5] = 22.77100;
  daa[18 * 20 + 6] = 19.63030;
  daa[18 * 20 + 7] = 10.36040;
  daa[18 * 20 + 8] = 387.34400;
  daa[18 * 20 + 9] = 42.01700;
  daa[18 * 20 + 10] = 39.86180;
  daa[18 * 20 + 11] = 13.32640;
  daa[18 * 20 + 12] = 42.84370;
  daa[18 * 20 + 13] = 645.42800;
  daa[18 * 20 + 14] = 21.60460;
  daa[18 * 20 + 15] = 78.69930;
  daa[18 * 20 + 16] = 29.11480;
  daa[18 * 20 + 17] = 248.53900;
  daa[19 * 20 + 0] = 200.60100;
  daa[19 * 20 + 1] = 25.18490;
  daa[19 * 20 + 2] = 19.62460;
  daa[19 * 20 + 3] = 15.23350;
  daa[19 * 20 + 4] = 100.21400;
  daa[19 * 20 + 5] = 30.12810;
  daa[19 * 20 + 6] = 58.87310;
  daa[19 * 20 + 7] = 18.72470;
  daa[19 * 20 + 8] = 11.83580;
  daa[19 * 20 + 9] = 782.13000;
  daa[19 * 20 + 10] = 180.03400;
  daa[19 * 20 + 11] = 30.54340;
  daa[19 * 20 + 12] = 205.84500;
  daa[19 * 20 + 13] = 64.98920;
  daa[19 * 20 + 14] = 31.48870;
  daa[19 * 20 + 15] = 23.27390;
  daa[19 * 20 + 16] = 138.82300;
  daa[19 * 20 + 17] = 36.53690;
  daa[19 * 20 + 18] = 31.47300;
  for (i = 0; i < 20; i++)
    for (j = 0; j < 20; j++)
      q[i][j] = 0.0;
  for (i = 0; i < 20; i++)
    for (j = 0; j < i; j++)
      daa[j * 20 + i] = daa[i * 20 + j];
  for (i = 0; i < 19; i++)
    for (j = i + 1; j < 20; j++)
      q[i][j] = daa[i * 20 + j];
  scaler = 1.0 / q[18][19];
  for (i = 0; i < 19; i++)
    for (j = i + 1; j < 20; j++)
      q[i][j] *= scaler;
  for (i = 0, r = 0; i < 19; i++)
    for (j = i + 1; j < 20; j++)
      ext_initialRates[r++] = q[i][j];
}
```