1double f[1024]; 2double (&fr) [1024] = f; 3double gbuf[1024]; 4double *g = gbuf; 5double *&gr = g; 6