Array : Filling Partially

/* Problem: This program partially fills an array from a file 
until the end of file (EOF). 
We get the actual number of data read  */
#include <stdio.h>
 
int
array_from_file (double a[], int size)
{
        int i;
        FILE* in;
 
        in = fopen ("data_array.dat", "r");
        
        i=0; /* the first cell */
 
        /* filling the array cell by cell */
        /* until it is full or until the EOF */
        while (i < 100 && fscanf (in, "%lf", &a[i]) != EOF)
        {
               i=i+1;
        }

        fclose (in);

        /* the actual number of values in the array */
        return (i);       
}
 
 
int
main (void)
{
        double array[100];
        int actual_size, i;
 
        actual_size = array_from_file (array, 100);
 
        for (i=0; i < actual_size; ++i)
               printf ("%3.1lf ", array[i]);
 
        printf ("\nThe array contains %d values ", actual_size);
        printf ("for a capacity of 100 cells.\n");
 
        return (0);
}