Person type to store name and contact details.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=PERSON_NAME_LEN), | public | :: | name | = | ' ' |
Person name. |
|
character(len=PERSON_MAIL_LEN), | public | :: | = | ' ' |
Person e-mail address. |
||
character(len=PERSON_PHONE_LEN), | public | :: | phone | = | ' ' |
Person phone number. |