// File: /workspace/github_c_makefile_star2_O3/ugobas[P]tnm/anharmonic_tnm.c
// Function: Compute_V1
float Compute_V1(struct interaction *Int, float r)
{
  if(Int==NULL)return(0);
  double V=0, f, f1;
  if(r<=Int->r1){
    if(POW){f=pow(r,-lambda); f1=lambda*f/r;}
    else{f=exp(-lambda*r); f1=lambda*f;}
    if(Int->A1)V+=Int->A1; 
    if(Int->A2)V+=2.0*Int->A2*f;
    if(Int->A4)V+=4.0*Int->A4*f*f*f;
    V*=-f1;
  }else if(r<=Int->r2){
    double d=(r-Int->r2), d2=d*d;
    V=Int->a1+2*Int->a2*d+3*Int->a3*d2+4*Int->a4*d2*d+5*Int->a5*d2*d2;
  }else if(r<=Int->r3){
    if(POW){f=pow(r,-lambda); f1=lambda*f/r;}
    else{f=exp(-lambda*r); f1=lambda*f;}
    if(Int->B1)V+=Int->B1; 
    if(Int->B2)V+=2*Int->B2*f;
    if(Int->B4)V+=4*Int->B4*f*f*f;
    V*=-f1;
  }else if(r<C_THR){
    // Final interpolation region
    double d=(r-C_THR), d2=d*d;
    V=3*Int->b3*d2+4*Int->b4*d2*d+5*Int->b5*d2*d2;
  }
  return(V);
}

// Assembly:
testq %rdi, %rdi
je 0x1cf2d
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %rbx
movss 0x10(%rdi), %xmm1
ucomiss %xmm0, %xmm1
jae 0x1cf31
movss 0x14(%rbx), %xmm1
ucomiss %xmm0, %xmm1
jae 0x1cf7c
movss 0x18(%rbx), %xmm1
ucomiss %xmm0, %xmm1
jae 0x1d0a4
leaq 0x4c1ab(%rip), %rax     # 0x69068
movss (%rax), %xmm2
xorps %xmm1, %xmm1
ucomiss %xmm0, %xmm2
jbe 0x1d095
subss %xmm2, %xmm0
cvtss2sd %xmm0, %xmm0
movaps %xmm0, %xmm2
mulsd %xmm0, %xmm2
movsd 0xa0(%rbx), %xmm3
movsd 0xa8(%rbx), %xmm4
mulsd 0x3a44c(%rip), %xmm3    # 0x57340
mulsd 0x39fec(%rip), %xmm4    # 0x56ee8
mulsd %xmm2, %xmm4
mulsd %xmm0, %xmm4
mulsd %xmm2, %xmm3
movsd 0xb0(%rbx), %xmm1
mulsd 0x3a430(%rip), %xmm1    # 0x57348
addsd %xmm4, %xmm3
mulsd %xmm2, %xmm1
mulsd %xmm2, %xmm1
addsd %xmm3, %xmm1
jmp 0x1d095
xorps %xmm0, %xmm0
retq
leaq 0x4b6b4(%rip), %rax     # 0x685ec
cmpl $0x0, (%rax)
je 0x1cff5
cvtss2sd %xmm0, %xmm0
movsd %xmm0, (%rsp)
leaq 0x4c183(%rip), %r14     # 0x690d4
movss (%r14), %xmm1
xorps 0x340d3(%rip), %xmm1    # 0x51030
cvtss2sd %xmm1, %xmm1
callq 0x20a0
xorps %xmm1, %xmm1
cvtss2sd (%r14), %xmm1
mulsd %xmm0, %xmm1
divsd (%rsp), %xmm1
jmp 0x1d024
subss %xmm1, %xmm0
cvtss2sd %xmm0, %xmm0
movaps %xmm0, %xmm2
mulsd %xmm0, %xmm2
movsd 0x80(%rbx), %xmm1
movsd 0x88(%rbx), %xmm3
addsd %xmm1, %xmm1
mulsd %xmm0, %xmm1
addsd 0x78(%rbx), %xmm1
mulsd 0x3a390(%rip), %xmm3    # 0x57340
mulsd %xmm2, %xmm3
addsd %xmm1, %xmm3
movsd 0x90(%rbx), %xmm4
mulsd 0x39f20(%rip), %xmm4    # 0x56ee8
mulsd %xmm2, %xmm4
mulsd %xmm0, %xmm4
movsd 0x98(%rbx), %xmm1
mulsd 0x3a368(%rip), %xmm1    # 0x57348
addsd %xmm3, %xmm4
mulsd %xmm2, %xmm1
mulsd %xmm2, %xmm1
addsd %xmm4, %xmm1
jmp 0x1d095
leaq 0x4c0d8(%rip), %r14     # 0x690d4
movss (%r14), %xmm1
xorps 0x34028(%rip), %xmm1    # 0x51030
mulss %xmm0, %xmm1
xorps %xmm0, %xmm0
cvtss2sd %xmm1, %xmm0
callq 0x22b0
xorps %xmm1, %xmm1
cvtss2sd (%r14), %xmm1
mulsd %xmm0, %xmm1
movsd 0x38(%rbx), %xmm3
movsd 0x40(%rbx), %xmm2
xorpd %xmm4, %xmm4
movapd %xmm3, %xmm5
cmpeqsd %xmm4, %xmm5
andnpd %xmm3, %xmm5
movapd %xmm2, %xmm3
addsd %xmm2, %xmm3
mulsd %xmm0, %xmm3
addsd %xmm5, %xmm3
cmpneqsd %xmm4, %xmm2
movapd %xmm2, %xmm6
andnpd %xmm5, %xmm6
andpd %xmm3, %xmm2
orpd %xmm6, %xmm2
movsd 0x48(%rbx), %xmm3
ucomisd %xmm4, %xmm3
jne 0x1d071
jnp 0x1d089
mulsd 0x39e6f(%rip), %xmm3    # 0x56ee8
mulsd %xmm0, %xmm3
mulsd %xmm0, %xmm3
mulsd %xmm0, %xmm3
addsd %xmm3, %xmm2
xorpd 0x33fff(%rip), %xmm1    # 0x51090
mulsd %xmm2, %xmm1
xorps %xmm0, %xmm0
cvtsd2ss %xmm1, %xmm0
addq $0x8, %rsp
popq %rbx
popq %r14
retq
leaq 0x4b541(%rip), %rax     # 0x685ec
cmpl $0x0, (%rax)
je 0x1d0e8
cvtss2sd %xmm0, %xmm0
movsd %xmm0, (%rsp)
leaq 0x4c014(%rip), %r14     # 0x690d4
movss (%r14), %xmm1
xorps 0x33f64(%rip), %xmm1    # 0x51030
cvtss2sd %xmm1, %xmm1
callq 0x20a0
xorps %xmm1, %xmm1
cvtss2sd (%r14), %xmm1
mulsd %xmm0, %xmm1
divsd (%rsp), %xmm1
jmp 0x1d117
leaq 0x4bfe5(%rip), %r14     # 0x690d4
movss (%r14), %xmm1
xorps 0x33f35(%rip), %xmm1    # 0x51030
mulss %xmm0, %xmm1
xorps %xmm0, %xmm0
cvtss2sd %xmm1, %xmm0
callq 0x22b0
xorps %xmm1, %xmm1
cvtss2sd (%r14), %xmm1
mulsd %xmm0, %xmm1
movsd 0x58(%rbx), %xmm3
movsd 0x60(%rbx), %xmm2
xorpd %xmm4, %xmm4
movapd %xmm3, %xmm5
cmpeqsd %xmm4, %xmm5
andnpd %xmm3, %xmm5
movapd %xmm2, %xmm3
addsd %xmm2, %xmm3
mulsd %xmm0, %xmm3
addsd %xmm5, %xmm3
cmpneqsd %xmm4, %xmm2
movapd %xmm2, %xmm6
andnpd %xmm5, %xmm6
andpd %xmm3, %xmm2
orpd %xmm6, %xmm2
movsd 0x68(%rbx), %xmm3
jmp 0x1d069