! module circle to be sure module regex doesn't allow commented modules module circle implicit none real, parameter :: pi = 4.*atan(1.) real :: radius end module circle