#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 */
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *, char *);
int /*<<< orphan*/ nmtensor(float, float, float, float, float, float **);
int /*<<< orphan*/ printf(char *, int, int, double, ...);
double radpmt(float **, int, int, int);
int /*<<< orphan*/ sscanf(char *, char *, ...);
int /*<<< orphan*/ stderr;
int main(int argc, char **argv) {
  int type, az, alpha;
  float stk, dip, rak, iso = 0., clvd = 0., mt[3][3];
  if (argc < 5) {
    fprintf(stderr,
            "Usage %s 1(P)|2(SV)|3(SH) strike dip rake [iso [clvd]]\n	"
            "	Output: azimuth take-off-angle strength\n",
            argv[0]);
    return -1;
  }
  sscanf(argv[1], "%d", &type);
  sscanf(argv[2], "%f", &stk);
  sscanf(argv[3], "%f", &dip);
  sscanf(argv[4], "%f", &rak);
  if (argc > 5)
    sscanf(argv[5], "%f", &iso);
  if (argc > 6)
    sscanf(argv[6], "%f", &clvd);
  nmtensor(iso, clvd, stk, dip, rak, mt);
  printf("MT %6.3f %6.3f %6.3f %6.3f %6.3f %6.3f\n", mt[0][0], mt[0][1],
         mt[0][2], mt[1][1], mt[1][2], mt[2][2]);
  for (az = 0; az < 360; az += 5) {
    for (alpha = 0; alpha < 90; alpha += 2) {
      printf("%3d %2d %f\n", az, alpha, radpmt(mt, alpha, az, type));
    }
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
movl   $0x0,-0x4(%rbp)
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x2c(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x30(%rbp)
cmpl   $0x5,-0x8(%rbp)
jge    11a8 <main+0x58>
mov    0x2e59(%rip),%rax
mov    (%rax),%edi
mov    -0x10(%rbp),%rax
mov    (%rax),%rdx
lea    0xe69(%rip),%rsi
call   1040 <fprintf@plt>
movl   $0xffffffff,-0x4(%rbp)
jmp    1335 <main+0x1e5>
mov    -0x10(%rbp),%rax
mov    0x8(%rax),%rdi
lea    0xeab(%rip),%rsi
lea    -0x14(%rbp),%rdx
mov    $0x0,%al
call   1060 <sscanf@plt>
mov    -0x10(%rbp),%rax
mov    0x10(%rax),%rdi
lea    0xe94(%rip),%rsi
lea    -0x20(%rbp),%rdx
mov    $0x0,%al
call   1060 <sscanf@plt>
mov    -0x10(%rbp),%rax
mov    0x18(%rax),%rdi
lea    0xe7a(%rip),%rsi
lea    -0x24(%rbp),%rdx
mov    $0x0,%al
call   1060 <sscanf@plt>
mov    -0x10(%rbp),%rax
mov    0x20(%rax),%rdi
lea    0xe60(%rip),%rsi
lea    -0x28(%rbp),%rdx
mov    $0x0,%al
call   1060 <sscanf@plt>
cmpl   $0x5,-0x8(%rbp)
jle    1234 <main+0xe4>
mov    -0x10(%rbp),%rax
mov    0x28(%rax),%rdi
lea    0xe3c(%rip),%rsi
lea    -0x2c(%rbp),%rdx
mov    $0x0,%al
call   1060 <sscanf@plt>
cmpl   $0x6,-0x8(%rbp)
jle    1258 <main+0x108>
mov    -0x10(%rbp),%rax
mov    0x30(%rax),%rdi
lea    0xe18(%rip),%rsi
lea    -0x30(%rbp),%rdx
mov    $0x0,%al
call   1060 <sscanf@plt>
movss  -0x2c(%rbp),%xmm0
movss  -0x30(%rbp),%xmm1
movss  -0x20(%rbp),%xmm2
movss  -0x24(%rbp),%xmm3
movss  -0x28(%rbp),%xmm4
lea    -0x60(%rbp),%rdi
call   1050 <nmtensor@plt>
cvttss2si -0x60(%rbp),%esi
cvttss2si -0x5c(%rbp),%edx
movss  -0x58(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x50(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movss  -0x4c(%rbp),%xmm2
cvtss2sd %xmm2,%xmm2
movss  -0x40(%rbp),%xmm3
cvtss2sd %xmm3,%xmm3
lea    0xdb9(%rip),%rdi
mov    $0x4,%al
call   1030 <printf@plt>
movl   $0x0,-0x18(%rbp)
cmpl   $0x168,-0x18(%rbp)
jge    132e <main+0x1de>
movl   $0x0,-0x1c(%rbp)
cmpl   $0x5a,-0x1c(%rbp)
jge    131b <main+0x1cb>
mov    -0x18(%rbp),%eax
mov    %eax,-0x68(%rbp)
mov    -0x1c(%rbp),%eax
mov    %eax,-0x64(%rbp)
lea    -0x60(%rbp),%rdi
mov    -0x1c(%rbp),%esi
mov    -0x18(%rbp),%edx
mov    -0x14(%rbp),%ecx
call   1070 <radpmt@plt>
mov    -0x68(%rbp),%esi
mov    -0x64(%rbp),%edx
lea    0xd8a(%rip),%rdi
mov    $0x1,%al
call   1030 <printf@plt>
mov    -0x1c(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x1c(%rbp)
jmp    12d1 <main+0x181>
jmp    1320 <main+0x1d0>
mov    -0x18(%rbp),%eax
add    $0x5,%eax
mov    %eax,-0x18(%rbp)
jmp    12bd <main+0x16d>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %rbx
sub    $0x48,%rsp
mov    %rsi,%r14
movl   $0x0,0xc(%rsp)
movl   $0x0,0x8(%rsp)
cmp    $0x4,%edi
jg     1194 <main+0x44>
mov    0x2e67(%rip),%rax
mov    (%rax),%edi
mov    (%r14),%rdx
lea    0xe7b(%rip),%rsi
call   1040 <fprintf@plt>
mov    $0xffffffff,%eax
jmp    12f5 <main+0x1a5>
mov    %edi,%ebp
mov    0x8(%r14),%rdi
lea    0xec1(%rip),%rsi
xor    %ebx,%ebx
lea    0x1c(%rsp),%rdx
xor    %eax,%eax
call   1060 <sscanf@plt>
mov    0x10(%r14),%rdi
lea    0xeab(%rip),%r15
lea    0x18(%rsp),%rdx
mov    %r15,%rsi
xor    %eax,%eax
call   1060 <sscanf@plt>
mov    0x18(%r14),%rdi
lea    0x14(%rsp),%rdx
mov    %r15,%rsi
xor    %eax,%eax
call   1060 <sscanf@plt>
mov    0x20(%r14),%rdi
lea    0x10(%rsp),%rdx
mov    %r15,%rsi
xor    %eax,%eax
call   1060 <sscanf@plt>
xorps  %xmm1,%xmm1
cmp    $0x5,%ebp
je     1233 <main+0xe3>
mov    0x28(%r14),%rdi
lea    0xe63(%rip),%rsi
lea    0xc(%rsp),%rdx
xor    %eax,%eax
call   1060 <sscanf@plt>
xorps  %xmm1,%xmm1
cmp    $0x7,%ebp
jb     1233 <main+0xe3>
mov    0x30(%r14),%rdi
lea    0xe44(%rip),%rsi
lea    0x8(%rsp),%rdx
xor    %eax,%eax
call   1060 <sscanf@plt>
movss  0x8(%rsp),%xmm1
movss  0xc(%rsp),%xmm0
movss  0x18(%rsp),%xmm2
movss  0x14(%rsp),%xmm3
movss  0x10(%rsp),%xmm4
lea    0x20(%rsp),%r14
mov    %r14,%rdi
call   1050 <nmtensor@plt>
cvttss2si 0x20(%rsp),%esi
cvttss2si 0x24(%rsp),%edx
movss  0x28(%rsp),%xmm0
movss  0x30(%rsp),%xmm1
cvtss2sd %xmm0,%xmm0
cvtss2sd %xmm1,%xmm1
movss  0x34(%rsp),%xmm2
cvtss2sd %xmm2,%xmm2
movss  0x40(%rsp),%xmm3
cvtss2sd %xmm3,%xmm3
lea    0xdd5(%rip),%rdi
mov    $0x4,%al
call   1030 <printf@plt>
lea    0xdef(%rip),%r15
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    $0xfffffffe,%ebp
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x2,%ebp
mov    0x1c(%rsp),%ecx
mov    %r14,%rdi
mov    %ebp,%esi
mov    %ebx,%edx
call   1070 <radpmt@plt>
mov    %r15,%rdi
mov    %ebx,%esi
mov    %ebp,%edx
mov    $0x1,%al
call   1030 <printf@plt>
cmp    $0x58,%ebp
jb     12c0 <main+0x170>
lea    0x5(%rbx),%eax
cmp    $0x163,%ebx
mov    %eax,%ebx
jb     12b0 <main+0x160>
xor    %eax,%eax
add    $0x48,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@stderr = global i32 0
@.str = [98 x i8] c"Usage %s 1(P)|2(SV)|3(SH) strike dip rake [iso [clvd]]\0A\09\09Output: azimuth take-off-angle strength\0A\00"
@.str.1 = [3 x i8] c"%d\00"
@.str.2 = [3 x i8] c"%f\00"
@.str.3 = [40 x i8] c"MT %6.3f %6.3f %6.3f %6.3f %6.3f %6.3f\0A\00"
@.str.4 = [12 x i8] c"%3d %2d %f\0A\00"
define i32 @main(i32 %0, i8** %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i8**
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca float
%10 = alloca float
%11 = alloca float
%12 = alloca float
%13 = alloca float
%14 = alloca [3 x [3 x float]]
store i32 0, i32* %3
store i32 %0, i32* %4
store i8** %1, i8*** %5
store float 0.000000e+00, float* %12
store float 0.000000e+00, float* %13
%15 = load i32, i32* %4
%16 = icmp slt i32 %15, 5
br i1 %16, label %17, label %23
17: ; preds = %2
%18 = load i32, i32* @stderr
%19 = load i8**, i8*** %5
%20 = getelementptr inbounds i8*, i8** %19, i64 0
%21 = load i8*, i8** %20
%22 = call i32 @fprintf(i32 %18, i8* getelementptr inbounds ([98 x i8], [98 x i8]* @.str, i64 0, i64 0), i8* %21)
store i32 -1, i32* %3
br label %114
23: ; preds = %2
%24 = load i8**, i8*** %5
%25 = getelementptr inbounds i8*, i8** %24, i64 1
%26 = load i8*, i8** %25
%27 = call i32 (i8*, i8*, ...) @sscanf(i8* %26, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %6)
%28 = load i8**, i8*** %5
%29 = getelementptr inbounds i8*, i8** %28, i64 2
%30 = load i8*, i8** %29
%31 = call i32 (i8*, i8*, ...) @sscanf(i8* %30, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %9)
%32 = load i8**, i8*** %5
%33 = getelementptr inbounds i8*, i8** %32, i64 3
%34 = load i8*, i8** %33
%35 = call i32 (i8*, i8*, ...) @sscanf(i8* %34, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %10)
%36 = load i8**, i8*** %5
%37 = getelementptr inbounds i8*, i8** %36, i64 4
%38 = load i8*, i8** %37
%39 = call i32 (i8*, i8*, ...) @sscanf(i8* %38, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %11)
%40 = load i32, i32* %4
%41 = icmp sgt i32 %40, 5
br i1 %41, label %42, label %47
42: ; preds = %23
%43 = load i8**, i8*** %5
%44 = getelementptr inbounds i8*, i8** %43, i64 5
%45 = load i8*, i8** %44
%46 = call i32 (i8*, i8*, ...) @sscanf(i8* %45, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %12)
br label %47
47: ; preds = %42, %23
%48 = load i32, i32* %4
%49 = icmp sgt i32 %48, 6
br i1 %49, label %50, label %55
50: ; preds = %47
%51 = load i8**, i8*** %5
%52 = getelementptr inbounds i8*, i8** %51, i64 6
%53 = load i8*, i8** %52
%54 = call i32 (i8*, i8*, ...) @sscanf(i8* %53, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %13)
br label %55
55: ; preds = %50, %47
%56 = load float, float* %12
%57 = load float, float* %13
%58 = load float, float* %9
%59 = load float, float* %10
%60 = load float, float* %11
%61 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 0
%62 = bitcast [3 x float]* %61 to float**
%63 = call i32 @nmtensor(float %56, float %57, float %58, float %59, float %60, float** %62)
%64 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 0
%65 = getelementptr inbounds [3 x float], [3 x float]* %64, i64 0, i64 0
%66 = load float, float* %65
%67 = fptosi float %66 to i32
%68 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 0
%69 = getelementptr inbounds [3 x float], [3 x float]* %68, i64 0, i64 1
%70 = load float, float* %69
%71 = fptosi float %70 to i32
%72 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 0
%73 = getelementptr inbounds [3 x float], [3 x float]* %72, i64 0, i64 2
%74 = load float, float* %73
%75 = fpext float %74 to double
%76 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 1
%77 = getelementptr inbounds [3 x float], [3 x float]* %76, i64 0, i64 1
%78 = load float, float* %77
%79 = fpext float %78 to double
%80 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 1
%81 = getelementptr inbounds [3 x float], [3 x float]* %80, i64 0, i64 2
%82 = load float, float* %81
%83 = fpext float %82 to double
%84 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 2
%85 = getelementptr inbounds [3 x float], [3 x float]* %84, i64 0, i64 2
%86 = load float, float* %85
%87 = fpext float %86 to double
%88 = call i32 (i8*, i32, i32, double, ...) @printf(i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.3, i64 0, i64 0), i32 %67, i32 %71, double %75, double %79, double %83, double %87)
store i32 0, i32* %7
br label %89
89: ; preds = %110, %55
%90 = load i32, i32* %7
%91 = icmp slt i32 %90, 360
br i1 %91, label %92, label %113
92: ; preds = %89
store i32 0, i32* %8
br label %93
93: ; preds = %106, %92
%94 = load i32, i32* %8
%95 = icmp slt i32 %94, 90
br i1 %95, label %96, label %109
96: ; preds = %93
%97 = load i32, i32* %7
%98 = load i32, i32* %8
%99 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %14, i64 0, i64 0
%100 = bitcast [3 x float]* %99 to float**
%101 = load i32, i32* %8
%102 = load i32, i32* %7
%103 = load i32, i32* %6
%104 = call double @radpmt(float** %100, i32 %101, i32 %102, i32 %103)
%105 = call i32 (i8*, i32, i32, double, ...) @printf(i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.4, i64 0, i64 0), i32 %97, i32 %98, double %104)
br label %106
106: ; preds = %96
%107 = load i32, i32* %8
%108 = add nsw i32 %107, 2
store i32 %108, i32* %8
br label %93
109: ; preds = %93
br label %110
110: ; preds = %109
%111 = load i32, i32* %7
%112 = add nsw i32 %111, 5
store i32 %112, i32* %7
br label %89
113: ; preds = %89
store i32 0, i32* %3
br label %114
114: ; preds = %113, %17
%115 = load i32, i32* %3
ret i32 %115
}

LLVM IR (-O2):
@stderr = global i32 0
@.str = [98 x i8] c"Usage %s 1(P)|2(SV)|3(SH) strike dip rake [iso [clvd]]\0A\09\09Output: azimuth take-off-angle strength\0A\00"
@.str.1 = [3 x i8] c"%d\00"
@.str.2 = [3 x i8] c"%f\00"
@.str.3 = [40 x i8] c"MT %6.3f %6.3f %6.3f %6.3f %6.3f %6.3f\0A\00"
@.str.4 = [12 x i8] c"%3d %2d %f\0A\00"
define i32 @main(i32 %0, i8** nocapture %1) {
%3 = alloca i32
%4 = alloca float
%5 = alloca float
%6 = alloca float
%7 = alloca float
%8 = alloca float
%9 = alloca [3 x [3 x float]]
%10 = bitcast i32* %3 to i8*
%11 = bitcast float* %4 to i8*
%12 = bitcast float* %5 to i8*
%13 = bitcast float* %6 to i8*
%14 = bitcast float* %7 to i8*
store float 0.000000e+00, float* %7
%15 = bitcast float* %8 to i8*
store float 0.000000e+00, float* %8
%16 = bitcast [3 x [3 x float]]* %9 to i8*
%17 = icmp slt i32 %0, 5
br i1 %17, label %18, label %22
18: ; preds = %2
%19 = load i32, i32* @stderr
%20 = load i8*, i8** %1
%21 = tail call i32 @fprintf(i32 %19, i8* getelementptr inbounds ([98 x i8], [98 x i8]* @.str, i64 0, i64 0), i8* %20)
br label %85
22: ; preds = %2
%23 = getelementptr inbounds i8*, i8** %1, i64 1
%24 = load i8*, i8** %23
%25 = call i32 (i8*, i8*, ...) @sscanf(i8* %24, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %3)
%26 = getelementptr inbounds i8*, i8** %1, i64 2
%27 = load i8*, i8** %26
%28 = call i32 (i8*, i8*, ...) @sscanf(i8* %27, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %4)
%29 = getelementptr inbounds i8*, i8** %1, i64 3
%30 = load i8*, i8** %29
%31 = call i32 (i8*, i8*, ...) @sscanf(i8* %30, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %5)
%32 = getelementptr inbounds i8*, i8** %1, i64 4
%33 = load i8*, i8** %32
%34 = call i32 (i8*, i8*, ...) @sscanf(i8* %33, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %6)
%35 = icmp eq i32 %0, 5
br i1 %35, label %46, label %36
36: ; preds = %22
%37 = getelementptr inbounds i8*, i8** %1, i64 5
%38 = load i8*, i8** %37
%39 = call i32 (i8*, i8*, ...) @sscanf(i8* %38, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %7)
%40 = icmp ugt i32 %0, 6
br i1 %40, label %41, label %46
41: ; preds = %36
%42 = getelementptr inbounds i8*, i8** %1, i64 6
%43 = load i8*, i8** %42
%44 = call i32 (i8*, i8*, ...) @sscanf(i8* %43, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.2, i64 0, i64 0), float* %8)
%45 = load float, float* %8
br label %46
46: ; preds = %22, %41, %36
%47 = phi float [ 0.000000e+00, %22 ], [ %45, %41 ], [ 0.000000e+00, %36 ]
%48 = load float, float* %7
%49 = load float, float* %4
%50 = load float, float* %5
%51 = load float, float* %6
%52 = bitcast [3 x [3 x float]]* %9 to float**
%53 = call i32 @nmtensor(float %48, float %47, float %49, float %50, float %51, float** %52)
%54 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %9, i64 0, i64 0, i64 0
%55 = load float, float* %54
%56 = fptosi float %55 to i32
%57 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %9, i64 0, i64 0, i64 1
%58 = load float, float* %57
%59 = fptosi float %58 to i32
%60 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %9, i64 0, i64 0, i64 2
%61 = load float, float* %60
%62 = fpext float %61 to double
%63 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %9, i64 0, i64 1, i64 1
%64 = load float, float* %63
%65 = fpext float %64 to double
%66 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %9, i64 0, i64 1, i64 2
%67 = load float, float* %66
%68 = fpext float %67 to double
%69 = getelementptr inbounds [3 x [3 x float]], [3 x [3 x float]]* %9, i64 0, i64 2, i64 2
%70 = load float, float* %69
%71 = fpext float %70 to double
%72 = call i32 (i8*, i32, i32, double, ...) @printf(i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.3, i64 0, i64 0), i32 %56, i32 %59, double %62, double %65, double %68, double %71)
br label %73
73: ; preds = %46, %82
%74 = phi i32 [ 0, %46 ], [ %83, %82 ]
br label %75
75: ; preds = %73, %75
%76 = phi i32 [ 0, %73 ], [ %80, %75 ]
%77 = load i32, i32* %3
%78 = call double @radpmt(float** %52, i32 %76, i32 %74, i32 %77)
%79 = call i32 (i8*, i32, i32, double, ...) @printf(i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.4, i64 0, i64 0), i32 %74, i32 %76, double %78)
%80 = add nuw nsw i32 %76, 2
%81 = icmp ult i32 %76, 88
br i1 %81, label %75, label %82
82: ; preds = %75
%83 = add nuw nsw i32 %74, 5
%84 = icmp ult i32 %74, 355
br i1 %84, label %73, label %85
85: ; preds = %82, %18
%86 = phi i32 [ -1, %18 ], [ 0, %82 ]
ret i32 %86
}