blob: 97a3fe653df5268d0a26cfa204199e2e3e82ddf7 [file] [log] [blame]
module mod
implicit none
integer :: variable !<<<<< 3, 14, 8, pass
end module
program encap1
use mod
implicit none
variable = 3
! 9 + 1
variable = variable * variable + (variable - 2)
print *, variable, " should be equal to ", 10
end program encap1