user: What is the c source code of the assembly code below?

```asm
<ho_recognize_font_1_lamed>:
  endbr64
  movsd  0x18(%rdi),%xmm4
  movsd  D38(%rip),%xmm5
  comisd %xmm5,%xmm4
  jbe    L124
  movsd  D25(%rip),%xmm1
  pxor   %xmm2,%xmm2
  movapd %xmm1,%xmm0
L149:
  movsd  0x88(%rdi),%xmm3
  ucomisd %xmm2,%xmm3
  jp     L42
  jne    L42
  ucomisd 0x90(%rdi),%xmm2
  jp     L42
  je     L243
L42:
  addsd  D16(%rip),%xmm0
L243:
  movsd  (%rdi),%xmm6
  comisd %xmm5,%xmm6
  jbe    L250
  addsd  %xmm1,%xmm0
L250:
  movsd  0x38(%rdi),%xmm5
  comisd D98(%rip),%xmm5
  jbe    L152
  addsd  %xmm1,%xmm0
L152:
  comisd 0x28(%rdi),%xmm1
  jbe    L68
  addsd  D16(%rip),%xmm0
L68:
  ucomisd 0xa0(%rdi),%xmm2
  jp     L11
  jne    L11
L217:
  movsd  D104(%rip),%xmm5
  comisd %xmm4,%xmm5
  jbe    L213
  subsd  %xmm1,%xmm0
L213:
  ucomisd %xmm2,%xmm3
  jp     L43
  jne    L43
  ucomisd 0x90(%rdi),%xmm2
  jp     L43
  jne    L43
  subsd  %xmm1,%xmm0
L43:
  movsd  0x20(%rdi),%xmm3
  comisd D86(%rip),%xmm3
  jbe    L209
  subsd  %xmm1,%xmm0
L209:
  movsd  D63(%rip),%xmm4
  comisd 0x10(%rdi),%xmm4
  jbe    L7
  subsd  %xmm1,%xmm0
L7:
  movsd  D64(%rip),%xmm4
  comisd 0x8(%rdi),%xmm4
  jbe    L125
  subsd  %xmm1,%xmm0
L125:
  movsd  D31(%rip),%xmm4
  comisd %xmm3,%xmm4
  jbe    L160
  subsd  %xmm1,%xmm0
L160:
  ucomisd 0x230(%rdi),%xmm2
  jp     L231
  jne    L231
L85:
  ucomisd 0x228(%rdi),%xmm2
  jp     L189
  jne    L189
  ret
  nopl   0x0(%rax)
L189:
  subsd  %xmm1,%xmm0
  ret
  nopl   (%rax)
L231:
  subsd  %xmm1,%xmm0
  jmp    L85
  cs nopw 0x0(%rax,%rax,1)
L11:
  subsd  %xmm1,%xmm0
  jmp    L217
  nopl   0x0(%rax)
L124:
  pxor   %xmm2,%xmm2
  movsd  D25(%rip),%xmm1
  movapd %xmm2,%xmm0
  jmp    L149
```

tool_calls: name: read_data
arguments: tag: D38
type_infered: f64
name: read_data
arguments: tag: D25
type_infered: f64
name: read_data
arguments: tag: D16
type_infered: f64
name: read_data
arguments: tag: D98
type_infered: f64[2]
name: read_data
arguments: tag: D104
type_infered: f64
name: read_data
arguments: tag: D86
type_infered: f64[2]
name: read_data
arguments: tag: D63
type_infered: f64
name: read_data
arguments: tag: D64
type_infered: f64
name: read_data
arguments: tag: D31
type_infered: f64

tool: D38: 0.6

tool: D25: 0.2

tool: D16: 0.1

tool: {"D98": [0.5,0.51]}

tool: D104: 0.51

tool: {"D86": [0.52,0.35]}

tool: D63: 0.35

tool: D64: 0.25

tool: D31: 0.47

assistant: ```c
double ho_recognize_font_1_lamed(const double *array_in) {
  double return_value = 0.0;
  if ((array_in[3]) > 0.6)
    return_value += 0.2;
  if ((array_in[17]) || (array_in[18]))
    return_value += 0.1;
  if ((array_in[0]) > 0.6)
    return_value += 0.2;
  if ((array_in[7]) > 0.5)
    return_value += 0.2;
  if ((array_in[5]) < 0.2)
    return_value += 0.1;
  if ((array_in[20]))
    return_value -= 0.2;
  if ((array_in[3]) < 0.51)
    return_value -= 0.2;
  if (!(array_in[17]) && !(array_in[18]))
    return_value -= 0.2;
  if ((array_in[4]) > 0.52)
    return_value -= 0.2;
  if ((array_in[2]) < 0.35)
    return_value -= 0.2;
  if ((array_in[1]) < 0.25)
    return_value -= 0.2;
  if ((array_in[4]) < 0.47)
    return_value -= 0.2;
  if ((array_in[70]))
    return_value -= 0.2;
  if ((array_in[69]))
    return_value -= 0.2;
  return return_value;
}
```