v2mo(3f) - [M_time:MONTH_NAME] returns the month name of a Common month number (LICENSE:MIT)
Synopsis
Description
Options
Returns
Example
Author
License
function v2mo(imonth,short) result(month_name)
integer,intent(in) :: imonth ! month number (1-12) character(len=:),allocatable :: month_name ! month name logical,intent(in),optional :: short
Given a Common Calendar month number, return the name of the month as a string.
imonth Common month number (1-12). If out of the allowable range the month name returned will be UNKNOWN. short Flag whether to return short or long name
month_name A string representing a month name or the word UNKNOWN
Sample program:
program demo_v2mo use M_time, only : v2mo implicit none integer :: i write(*,*)(v2mo(i),i=1,13) end program demo_v2moresults:
January February March April May June July August September October November December UNKNOWN.
John S. Urban, 2015
Nemo Release 3.1 | v2mo (3) | February 23, 2025 |