Mixed kind expressions:
INTEGER(short) :: members, attendees INTEGER(long) :: salaries, costs
the expression:
For more information, click here