program main use circle, only: pi use line, only: length implicit none print *,'pi=',pi length = pi print *, length end program