for(a=0;a<(dim);a++)
        for(b=0;b<(dim);b++)
           relSE[a][b] = 0.0;           //initializare matrice 

for (a=0;a<dim;a++) //parcurg pe verticala fiecare linie
    for (b=dist;b<dim;b+=dist+lat) //plec cu spatiu 
        for(k=0;k<lat;k++) 
          relSE[a][b]=1.41;