build/org.eclipse.cdt.managedbuilder.core.tests/resources/test30Projects/CDTFortranTest1/MAIN.F90

  PROGRAM MAIN
    USE AVE_CALCULATOR    
    INTEGER :: AVE
    INTEGER, DIMENSION(3) :: ENTERED = 0
    PRINT *, 'Type three integers: '
    READ  (*,'(I10)') ENTERED
    AVE = AVERAGE(ENTERED)
    PRINT *, 'Answer is: ', AVE
  END PROGRAM MAIN