Manual Reference Pages - v2mo (3)

v2mo(3f) - [M_time:MONTH_NAME] returns the month name of a Common month number (LICENSE:PD)

Synopsis
Description
Options
Returns
Example
Author
License

function v2mo(imonth) result(month_name)

    integer,intent(in)           :: imonth      ! month number (1-12)
    character(len=:),allocatable :: month_name  ! month name

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’.

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_v2mo

results:

    January
    February
    March
    April
    May
    June
    July
    August
    September
    October
    November
    December
    UNKNOWN.

John S. Urban, 2015

Public Domain

v2mo (3)

March 11, 2021

Generated by manServer 1.08 from 417f1ec2-7c21-4bb3-9f2c-121a7004f723 using man macros.

month_name
	A string representing a month name or the word ’UNKNOWN’