subroutine a
print *,'this is a from library a'
return
end
