Searched refs:gen_message (Results 1 – 1 of 1) sorted by relevance
640 print *, get_message(gen_message)642 function gen_message function643 character(10) :: gen_message local644 gen_message = message645 end function gen_message