bencch Public

Watch 0 Fork 0 Star 0

Fortran · 219 bytes Raw Blame History

  
        1
        ! CHECK: 11
      
        2
        program main
      
        3
            use collision_left_values, only: left_value => payload
      
        4
            use collision_right_values, only: right_value => payload
      
        5
            implicit none
      
        6
        
        7
            print *, left_value + right_value
      
        8
        end program main
      
        9

1	! CHECK: 11
2	program main
3	use collision_left_values, only: left_value => payload
4	use collision_right_values, only: right_value => payload
5	implicit none
6
7	print *, left_value + right_value
8	end program main
9