You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

9 lines
144 B

function RIGHT(a, b) result(c)
integer, intent(in) :: ChangeMe
integer, intent(in) :: b
integer, intent(out) :: c
c = a+b
end function RIGHT