blob: 72827d7dd91dc82da18f280f5e01df7bd5be2092 [file] [log] [blame]
module mod
implicit none
integer :: variable !3,14,8
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