Prepacte ze som neodpovedal skorej nemohol som tu je moj kod funkcie

void naplneniePola(FILE *fr,double **pole)
{
    char retazec[50];
    int pocetRiadkov=0;
    int i;
    int j;

    if(*pole!=NULL)free(*pole);
    rewind(fr);
    while((fgets(retazec,50,fr))!=NULL) //program priradi retazcu cely riadok v subore a kontroluje po riadkoch dokial nenarazi na koniec suboru
    {
        if(*retazec=='\n')++pocetRiadkov;   //program zistuje ci sa retazec rovna iba znaku '\n' cize je prazdny ak ano povysi pocet riadkov
    }
    *pole=(double *)malloc((pocetRiadkov+1)*sizeof(double));
    rewind(fr);
    for(i=0;i<pocetRiadkov+1;++i) //program priradi retazcu cely riadok v subore a kontroluje po riadkoch dokial nenarazi na koniec suboru
    {
        for(j=0;j<3;++j)fgets(retazec,50,fr);
        fscanf(fr,"%lf",(pole)[i]);
        for(j=0;j<4;++j)fgets(retazec,50,fr);
    }
}