program b1

 implicit none

 integer :: a,b,c,d,i,x,y

 read*,a,b,c,d

 do i=1,1000 
   x=c-b
   if(x<=0) print*,"Yes"
   if(x<=0) exit
   y=a-d 
   if(y<=0) print*,"No"
   if(y<=0) exit
   c=x
   a=y
 end do
 

end program b1
; ModuleID = 'FIRModule'
source_filename = "FIRModule"
target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-f80:128-n8:16:32:64-S128"
target triple = "x86_64-pc-linux-gnu"

@_QQcl.397470705266960d1ef324c17f4ba352 = linkonce constant [73 x i8] c"/home/ubuntu/Downloads/TheStack_IR/Collated/Fortran/Source_1623/source.f\00"
@_QQcl.596573 = linkonce constant [3 x i8] c"Yes"
@_QQcl.4E6F = linkonce constant [2 x i8] c"No"
@_QQEnvironmentDefaults = local_unnamed_addr constant ptr null

define void @_QQmain() local_unnamed_addr {
  %1 = alloca i32, align 4
  %2 = alloca i32, align 4
  %3 = alloca i32, align 4
  %4 = alloca i32, align 4
  %5 = tail call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.397470705266960d1ef324c17f4ba352, i32 7)
  %6 = call i1 @_FortranAioInputInteger(ptr %5, ptr nonnull %1, i32 4)
  %7 = call i1 @_FortranAioInputInteger(ptr %5, ptr nonnull %2, i32 4)
  %8 = call i1 @_FortranAioInputInteger(ptr %5, ptr nonnull %3, i32 4)
  %9 = call i1 @_FortranAioInputInteger(ptr %5, ptr nonnull %4, i32 4)
  %10 = call i32 @_FortranAioEndIoStatement(ptr %5)
  %11 = load i32, ptr %2, align 4, !tbaa !3
  %.promoted = load i32, ptr %3, align 4, !tbaa !3
  %.promoted14 = load i32, ptr %1, align 4, !tbaa !3
  %12 = load i32, ptr %4, align 4
  br label %13

13:                                               ; preds = %.critedge13.1, %0
  %.015 = phi i32 [ 1000, %0 ], [ %30, %.critedge13.1 ]
  %14 = phi i32 [ %.promoted, %0 ], [ %26, %.critedge13.1 ]
  %15 = phi i32 [ %.promoted14, %0 ], [ %28, %.critedge13.1 ]
  %16 = sub i32 %14, %11
  %17 = icmp slt i32 %16, 1
  br i1 %17, label %18, label %.critedge

18:                                               ; preds = %.critedge13, %13
  %19 = call ptr @_FortranAioBeginExternalListOutput(i32 -1, ptr nonnull @_QQcl.397470705266960d1ef324c17f4ba352, i32 11)
  %20 = call i1 @_FortranAioOutputAscii(ptr %19, ptr nonnull @_QQcl.596573, i64 3)
  br label %.loopexit.sink.split

.critedge:                                        ; preds = %13
  %21 = sub i32 %15, %12
  %22 = icmp slt i32 %21, 1
  br i1 %22, label %23, label %.critedge13

23:                                               ; preds = %.critedge.1, %.critedge
  %24 = call ptr @_FortranAioBeginExternalListOutput(i32 -1, ptr nonnull @_QQcl.397470705266960d1ef324c17f4ba352, i32 14)
  %25 = call i1 @_FortranAioOutputAscii(ptr %24, ptr nonnull @_QQcl.4E6F, i64 2)
  br label %.loopexit.sink.split

.critedge13:                                      ; preds = %.critedge
  store i32 %16, ptr %3, align 4, !tbaa !3
  store i32 %21, ptr %1, align 4, !tbaa !3
  %26 = sub i32 %16, %11
  %27 = icmp slt i32 %26, 1
  br i1 %27, label %18, label %.critedge.1

.critedge.1:                                      ; preds = %.critedge13
  %28 = sub i32 %21, %12
  %29 = icmp slt i32 %28, 1
  br i1 %29, label %23, label %.critedge13.1

.critedge13.1:                                    ; preds = %.critedge.1
  store i32 %26, ptr %3, align 4, !tbaa !3
  store i32 %28, ptr %1, align 4, !tbaa !3
  %30 = add nsw i32 %.015, -2
  %.not = icmp eq i32 %.015, 2
  br i1 %.not, label %.loopexit, label %13

.loopexit.sink.split:                             ; preds = %18, %23
  %.sink = phi ptr [ %24, %23 ], [ %19, %18 ]
  %31 = call i32 @_FortranAioEndIoStatement(ptr %.sink)
  br label %.loopexit

.loopexit:                                        ; preds = %.critedge13.1, %.loopexit.sink.split
  ret void
}

declare ptr @_FortranAioBeginExternalListInput(i32, ptr, i32) local_unnamed_addr

declare i1 @_FortranAioInputInteger(ptr, ptr, i32) local_unnamed_addr

declare i32 @_FortranAioEndIoStatement(ptr) local_unnamed_addr

declare ptr @_FortranAioBeginExternalListOutput(i32, ptr, i32) local_unnamed_addr

declare i1 @_FortranAioOutputAscii(ptr, ptr, i64) local_unnamed_addr

!llvm.module.flags = !{!0, !1, !2}

!0 = !{i32 2, !"Debug Info Version", i32 3}
!1 = !{i32 8, !"PIC Level", i32 2}
!2 = !{i32 7, !"PIE Level", i32 2}
!3 = !{!4, !4, i64 0}
!4 = !{!"any data access", !5, i64 0}
!5 = !{!"any access", !6, i64 0}
!6 = !{!"Flang Type TBAA Root"}
