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