#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
float bessj(int, float);
float bessj0(float);
float bessj1(float);
int /*<<< orphan*/ derivs(double, float *, float *);
int /*<<< orphan*/ free_vector(float *, int, int);
int /*<<< orphan*/ getchar();
int /*<<< orphan*/ mmid(float *, float *, int, double, double, int, float *,
                        int /*<<< orphan*/ (*)(double, float *, float *));
int /*<<< orphan*/ printf(char *, ...);
float *vector(int, int);
int main(void) {
  int i;
  float b1, b2, b3, b4, xf = 1.0 + 0.5, *y, *yout, *dydx;
  y = vector(1, 4);
  yout = vector(1, 4);
  dydx = vector(1, 4);
  y[1] = bessj0(1.0);
  y[2] = bessj1(1.0);
  y[3] = bessj(2, 1.0);
  y[4] = bessj(3, 1.0);
  derivs(1.0, y, dydx);
  b1 = bessj0(xf);
  b2 = bessj1(xf);
  b3 = bessj(2, xf);
  b4 = bessj(3, xf);
  printf("First four Bessel functions:\n");
  for (i = 5; i <= 50; i += 5) {
    mmid(y, dydx, 4, 1.0, 0.5, i, yout, derivs);
    printf("\n%s %5.2f %s %5.2f %s %2d %s \n", "x=", 1.0, " to ", 1.0 + 0.5,
           " in ", i, " steps");
    printf("%14s %9s\n", "integration", "bessj");
    printf("%12.6f %12.6f\n", yout[1], b1);
    printf("%12.6f %12.6f\n", yout[2], b2);
    printf("%12.6f %12.6f\n", yout[3], b3);
    printf("%12.6f %12.6f\n", yout[4], b4);
    printf("\nPress RETURN to continue...\n");
    (void)getchar();
  }
  free_vector(dydx, 1, 4);
  free_vector(yout, 1, 4);
  free_vector(y, 1, 4);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
movl   $0x0,-0x4(%rbp)
movss  0xe85(%rip),%xmm0
movss  %xmm0,-0x1c(%rbp)
mov    $0x1,%edi
mov    $0x4,%esi
call   1080 <vector@plt>
mov    %rax,-0x28(%rbp)
mov    $0x1,%edi
mov    $0x4,%esi
call   1080 <vector@plt>
mov    %rax,-0x30(%rbp)
mov    $0x1,%edi
mov    $0x4,%esi
call   1080 <vector@plt>
mov    %rax,-0x38(%rbp)
movss  0xe3b(%rip),%xmm0
call   1090 <bessj0@plt>
mov    -0x28(%rbp),%rax
movss  %xmm0,0x4(%rax)
movss  0xe25(%rip),%xmm0
call   1040 <bessj1@plt>
mov    -0x28(%rbp),%rax
movss  %xmm0,0x8(%rax)
mov    $0x2,%edi
movss  0xe0a(%rip),%xmm0
call   10a0 <bessj@plt>
mov    -0x28(%rbp),%rax
movss  %xmm0,0xc(%rax)
mov    $0x3,%edi
movss  0xdef(%rip),%xmm0
call   10a0 <bessj@plt>
mov    -0x28(%rbp),%rax
movss  %xmm0,0x10(%rax)
mov    -0x28(%rbp),%rdi
mov    -0x38(%rbp),%rsi
movsd  0xdb9(%rip),%xmm0
call   10b0 <derivs@plt>
movss  -0x1c(%rbp),%xmm0
call   1090 <bessj0@plt>
movss  %xmm0,-0xc(%rbp)
movss  -0x1c(%rbp),%xmm0
call   1040 <bessj1@plt>
movss  %xmm0,-0x10(%rbp)
movss  -0x1c(%rbp),%xmm0
mov    $0x2,%edi
call   10a0 <bessj@plt>
movss  %xmm0,-0x14(%rbp)
movss  -0x1c(%rbp),%xmm0
mov    $0x3,%edi
call   10a0 <bessj@plt>
movss  %xmm0,-0x18(%rbp)
lea    0xd87(%rip),%rdi
mov    $0x0,%al
call   1050 <printf@plt>
movl   $0x5,-0x8(%rbp)
cmpl   $0x32,-0x8(%rbp)
jg     13ee <main+0x26e>
mov    -0x28(%rbp),%rdi
mov    -0x38(%rbp),%rsi
mov    -0x8(%rbp),%ecx
mov    -0x30(%rbp),%r8
mov    $0x4,%edx
movsd  0xd33(%rip),%xmm0
movsd  0xd3b(%rip),%xmm1
mov    0x2d0c(%rip),%r9
call   1030 <mmid@plt>
mov    -0x8(%rbp),%r8d
lea    0xd52(%rip),%rdi
lea    0xd6a(%rip),%rsi
movsd  0xd05(%rip),%xmm0
lea    0xd5e(%rip),%rdx
movsd  0xcfe(%rip),%xmm1
lea    0xd54(%rip),%rcx
lea    0xd52(%rip),%r9
mov    $0x2,%al
call   1050 <printf@plt>
lea    0xd4b(%rip),%rdi
lea    0xd4e(%rip),%rsi
lea    0xd53(%rip),%rdx
mov    $0x0,%al
call   1050 <printf@plt>
mov    -0x30(%rbp),%rax
movss  0x4(%rax),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0xc(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
lea    0xd35(%rip),%rdi
mov    $0x2,%al
call   1050 <printf@plt>
mov    -0x30(%rbp),%rax
movss  0x8(%rax),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x10(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
lea    0xd11(%rip),%rdi
mov    $0x2,%al
call   1050 <printf@plt>
mov    -0x30(%rbp),%rax
movss  0xc(%rax),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x14(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
lea    0xced(%rip),%rdi
mov    $0x2,%al
call   1050 <printf@plt>
mov    -0x30(%rbp),%rax
movss  0x10(%rax),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x18(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
lea    0xcc9(%rip),%rdi
mov    $0x2,%al
call   1050 <printf@plt>
lea    0xcca(%rip),%rdi
mov    $0x0,%al
call   1050 <printf@plt>
mov    $0x0,%al
call   1070 <getchar@plt>
mov    -0x8(%rbp),%eax
add    $0x5,%eax
mov    %eax,-0x8(%rbp)
jmp    12a7 <main+0x127>
mov    -0x38(%rbp),%rdi
mov    $0x1,%esi
mov    $0x4,%edx
call   1060 <free_vector@plt>
mov    -0x30(%rbp),%rdi
mov    $0x1,%esi
mov    $0x4,%edx
call   1060 <free_vector@plt>
mov    -0x28(%rbp),%rdi
mov    $0x1,%esi
mov    $0x4,%edx
call   1060 <free_vector@plt>
xor    %eax,%eax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    $0x1,%edi
mov    $0x4,%esi
call   1090 <vector@plt>
mov    %rax,%r14
mov    $0x1,%edi
mov    $0x4,%esi
call   1090 <vector@plt>
mov    %rax,%rbx
mov    $0x1,%edi
mov    $0x4,%esi
call   1090 <vector@plt>
mov    %rax,%r15
movss  0xe24(%rip),%xmm0
call   10a0 <bessj0@plt>
movss  %xmm0,0x4(%r14)
movss  0xe11(%rip),%xmm0
call   1050 <bessj1@plt>
movss  %xmm0,0x8(%r14)
mov    $0x2,%edi
movss  0xdf9(%rip),%xmm0
call   10b0 <bessj@plt>
movss  %xmm0,0xc(%r14)
mov    $0x3,%edi
movss  0xde1(%rip),%xmm0
call   10b0 <bessj@plt>
movss  %xmm0,0x10(%r14)
movsd  0xdd6(%rip),%xmm0
mov    %r14,%rdi
mov    %r15,%rsi
call   10c0 <derivs@plt>
movss  0xdbf(%rip),%xmm0
call   10a0 <bessj0@plt>
movss  %xmm0,0x20(%rsp)
movss  0xdac(%rip),%xmm0
call   1050 <bessj1@plt>
movss  %xmm0,0x18(%rsp)
mov    $0x2,%edi
movss  0xd94(%rip),%xmm0
call   10b0 <bessj@plt>
movss  %xmm0,0x10(%rsp)
mov    $0x3,%edi
movss  0xd7c(%rip),%xmm0
call   10b0 <bessj@plt>
movss  %xmm0,0x8(%rsp)
lea    0xde4(%rip),%rdi
call   1040 <puts@plt>
movss  0x20(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  %xmm0,0x20(%rsp)
movss  0x18(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  %xmm0,0x18(%rsp)
movss  0x10(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  %xmm0,0x10(%rsp)
movss  0x8(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  %xmm0,0x8(%rsp)
lea    0xd89(%rip),%r12
lea    0xdae(%rip),%r13
xor    %ebp,%ebp
nop
add    $0x5,%ebp
mov    %r14,%rdi
mov    %r15,%rsi
mov    $0x4,%edx
movsd  0xd02(%rip),%xmm0
movsd  0xd02(%rip),%xmm1
mov    %ebp,%ecx
mov    %rbx,%r8
mov    0x2cce(%rip),%r9
call   1030 <mmid@plt>
lea    0xcfa(%rip),%rdi
lea    0xd12(%rip),%rsi
movsd  0xcd3(%rip),%xmm0
lea    0xd06(%rip),%rdx
movsd  0xcd4(%rip),%xmm1
lea    0xcfc(%rip),%rcx
mov    %ebp,%r8d
lea    0xcf7(%rip),%r9
mov    $0x2,%al
call   1060 <printf@plt>
lea    0xcf0(%rip),%rdi
lea    0xcf3(%rip),%rsi
lea    0xcf8(%rip),%rdx
xor    %eax,%eax
call   1060 <printf@plt>
movss  0x4(%rbx),%xmm0
cvtss2sd %xmm0,%xmm0
mov    %r12,%rdi
movsd  0x20(%rsp),%xmm1
mov    $0x2,%al
call   1060 <printf@plt>
movss  0x8(%rbx),%xmm0
cvtss2sd %xmm0,%xmm0
mov    %r12,%rdi
movsd  0x18(%rsp),%xmm1
mov    $0x2,%al
call   1060 <printf@plt>
movss  0xc(%rbx),%xmm0
cvtss2sd %xmm0,%xmm0
mov    %r12,%rdi
movsd  0x10(%rsp),%xmm1
mov    $0x2,%al
call   1060 <printf@plt>
movss  0x10(%rbx),%xmm0
cvtss2sd %xmm0,%xmm0
mov    %r12,%rdi
movsd  0x8(%rsp),%xmm1
mov    $0x2,%al
call   1060 <printf@plt>
mov    %r13,%rdi
call   1040 <puts@plt>
xor    %eax,%eax
call   1080 <getchar@plt>
cmp    $0x2e,%ebp
jb     12f0 <main+0x160>
mov    %r15,%rdi
mov    $0x1,%esi
mov    $0x4,%edx
call   1070 <free_vector@plt>
mov    %rbx,%rdi
mov    $0x1,%esi
mov    $0x4,%edx
call   1070 <free_vector@plt>
mov    %r14,%rdi
mov    $0x1,%esi
mov    $0x4,%edx
call   1070 <free_vector@plt>
xor    %eax,%eax
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [30 x i8] c"First four Bessel functions:\0A\00"
@.str.1 = [31 x i8] c"\0A%s %5.2f %s %5.2f %s %2d %s \0A\00"
@.str.2 = [3 x i8] c"x=\00"
@.str.3 = [5 x i8] c" to \00"
@.str.4 = [5 x i8] c" in \00"
@.str.5 = [7 x i8] c" steps\00"
@.str.6 = [10 x i8] c"%14s %9s\0A\00"
@.str.7 = [12 x i8] c"integration\00"
@.str.8 = [6 x i8] c"bessj\00"
@.str.9 = [15 x i8] c"%12.6f %12.6f\0A\00"
@.str.10 = [30 x i8] c"\0APress RETURN to continue...\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca float
%4 = alloca float
%5 = alloca float
%6 = alloca float
%7 = alloca float
%8 = alloca float*
%9 = alloca float*
%10 = alloca float*
store i32 0, i32* %1
store float 1.500000e+00, float* %7
%11 = call float* @vector(i32 1, i32 4)
store float* %11, float** %8
%12 = call float* @vector(i32 1, i32 4)
store float* %12, float** %9
%13 = call float* @vector(i32 1, i32 4)
store float* %13, float** %10
%14 = call float @bessj0(float 1.000000e+00)
%15 = load float*, float** %8
%16 = getelementptr inbounds float, float* %15, i64 1
store float %14, float* %16
%17 = call float @bessj1(float 1.000000e+00)
%18 = load float*, float** %8
%19 = getelementptr inbounds float, float* %18, i64 2
store float %17, float* %19
%20 = call float @bessj(i32 2, float 1.000000e+00)
%21 = load float*, float** %8
%22 = getelementptr inbounds float, float* %21, i64 3
store float %20, float* %22
%23 = call float @bessj(i32 3, float 1.000000e+00)
%24 = load float*, float** %8
%25 = getelementptr inbounds float, float* %24, i64 4
store float %23, float* %25
%26 = load float*, float** %8
%27 = load float*, float** %10
%28 = call i32 @derivs(double 1.000000e+00, float* %26, float* %27)
%29 = load float, float* %7
%30 = call float @bessj0(float %29)
store float %30, float* %3
%31 = load float, float* %7
%32 = call float @bessj1(float %31)
store float %32, float* %4
%33 = load float, float* %7
%34 = call float @bessj(i32 2, float %33)
store float %34, float* %5
%35 = load float, float* %7
%36 = call float @bessj(i32 3, float %35)
store float %36, float* %6
%37 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str, i64 0, i64 0))
store i32 5, i32* %2
br label %38
38: ; preds = %80, %0
%39 = load i32, i32* %2
%40 = icmp sle i32 %39, 50
br i1 %40, label %41, label %83
41: ; preds = %38
%42 = load float*, float** %8
%43 = load float*, float** %10
%44 = load i32, i32* %2
%45 = load float*, float** %9
%46 = call i32 @mmid(float* %42, float* %43, i32 4, double 1.000000e+00, double 5.000000e-01, i32 %44, float* %45, i32 (double, float*, float*)* @derivs)
%47 = load i32, i32* %2
%48 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.1, i64 0, i64 0), i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), double 1.000000e+00, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), double 1.500000e+00, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.4, i64 0, i64 0), i32 %47, i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.5, i64 0, i64 0))
%49 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str.6, i64 0, i64 0), i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.7, i64 0, i64 0), i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.8, i64 0, i64 0))
%50 = load float*, float** %9
%51 = getelementptr inbounds float, float* %50, i64 1
%52 = load float, float* %51
%53 = fpext float %52 to double
%54 = load float, float* %3
%55 = fpext float %54 to double
%56 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %53, double %55)
%57 = load float*, float** %9
%58 = getelementptr inbounds float, float* %57, i64 2
%59 = load float, float* %58
%60 = fpext float %59 to double
%61 = load float, float* %4
%62 = fpext float %61 to double
%63 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %60, double %62)
%64 = load float*, float** %9
%65 = getelementptr inbounds float, float* %64, i64 3
%66 = load float, float* %65
%67 = fpext float %66 to double
%68 = load float, float* %5
%69 = fpext float %68 to double
%70 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %67, double %69)
%71 = load float*, float** %9
%72 = getelementptr inbounds float, float* %71, i64 4
%73 = load float, float* %72
%74 = fpext float %73 to double
%75 = load float, float* %6
%76 = fpext float %75 to double
%77 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %74, double %76)
%78 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str.10, i64 0, i64 0))
%79 = call i32 (...) @getchar()
br label %80
80: ; preds = %41
%81 = load i32, i32* %2
%82 = add nsw i32 %81, 5
store i32 %82, i32* %2
br label %38
83: ; preds = %38
%84 = load float*, float** %10
%85 = call i32 @free_vector(float* %84, i32 1, i32 4)
%86 = load float*, float** %9
%87 = call i32 @free_vector(float* %86, i32 1, i32 4)
%88 = load float*, float** %8
%89 = call i32 @free_vector(float* %88, i32 1, i32 4)
ret i32 0
}

LLVM IR (-O2):
@.str.1 = [31 x i8] c"\0A%s %5.2f %s %5.2f %s %2d %s \0A\00"
@.str.2 = [3 x i8] c"x=\00"
@.str.3 = [5 x i8] c" to \00"
@.str.4 = [5 x i8] c" in \00"
@.str.5 = [7 x i8] c" steps\00"
@.str.6 = [10 x i8] c"%14s %9s\0A\00"
@.str.7 = [12 x i8] c"integration\00"
@.str.8 = [6 x i8] c"bessj\00"
@.str.9 = [15 x i8] c"%12.6f %12.6f\0A\00"
@str = [29 x i8] c"First four Bessel functions:\00"
@str.11 = [29 x i8] c"\0APress RETURN to continue...\00"
define i32 @main() {
%1 = tail call float* @vector(i32 1, i32 4)
%2 = tail call float* @vector(i32 1, i32 4)
%3 = tail call float* @vector(i32 1, i32 4)
%4 = tail call float @bessj0(float 1.000000e+00)
%5 = getelementptr inbounds float, float* %1, i64 1
store float %4, float* %5
%6 = tail call float @bessj1(float 1.000000e+00)
%7 = getelementptr inbounds float, float* %1, i64 2
store float %6, float* %7
%8 = tail call float @bessj(i32 2, float 1.000000e+00)
%9 = getelementptr inbounds float, float* %1, i64 3
store float %8, float* %9
%10 = tail call float @bessj(i32 3, float 1.000000e+00)
%11 = getelementptr inbounds float, float* %1, i64 4
store float %10, float* %11
%12 = tail call i32 @derivs(double 1.000000e+00, float* %1, float* %3)
%13 = tail call float @bessj0(float 1.500000e+00)
%14 = tail call float @bessj1(float 1.500000e+00)
%15 = tail call float @bessj(i32 2, float 1.500000e+00)
%16 = tail call float @bessj(i32 3, float 1.500000e+00)
%17 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([29 x i8], [29 x i8]* @str, i64 0, i64 0))
%18 = getelementptr inbounds float, float* %2, i64 1
%19 = fpext float %13 to double
%20 = getelementptr inbounds float, float* %2, i64 2
%21 = fpext float %14 to double
%22 = getelementptr inbounds float, float* %2, i64 3
%23 = fpext float %15 to double
%24 = getelementptr inbounds float, float* %2, i64 4
%25 = fpext float %16 to double
br label %26
26: ; preds = %0, %26
%27 = phi i32 [ 5, %0 ], [ %45, %26 ]
%28 = tail call i32 @mmid(float* %1, float* %3, i32 4, double 1.000000e+00, double 5.000000e-01, i32 %27, float* %2, i32 (double, float*, float*)* @derivs)
%29 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([31 x i8], [31 x i8]* @.str.1, i64 0, i64 0), i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), double 1.000000e+00, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), double 1.500000e+00, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.4, i64 0, i64 0), i32 %27, i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.5, i64 0, i64 0))
%30 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([10 x i8], [10 x i8]* @.str.6, i64 0, i64 0), i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.7, i64 0, i64 0), i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.8, i64 0, i64 0))
%31 = load float, float* %18
%32 = fpext float %31 to double
%33 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %32, double %19)
%34 = load float, float* %20
%35 = fpext float %34 to double
%36 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %35, double %21)
%37 = load float, float* %22
%38 = fpext float %37 to double
%39 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %38, double %23)
%40 = load float, float* %24
%41 = fpext float %40 to double
%42 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([15 x i8], [15 x i8]* @.str.9, i64 0, i64 0), double %41, double %25)
%43 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([29 x i8], [29 x i8]* @str.11, i64 0, i64 0))
%44 = tail call i32 (...) @getchar()
%45 = add nuw nsw i32 %27, 5
%46 = icmp ult i32 %27, 46
br i1 %46, label %26, label %47
47: ; preds = %26
%48 = tail call i32 @free_vector(float* %3, i32 1, i32 4)
%49 = tail call i32 @free_vector(float* %2, i32 1, i32 4)
%50 = tail call i32 @free_vector(float* %1, i32 1, i32 4)
ret i32 0
}