SZ_VOIDSTRUCT
while (fread((char *) &Enrgyvoid, SZ_VOIDSTRUCT, 1, Energyvoidfp) == 1)
loc += SZ_VOIDSTRUCT;
fread((char *) &Enrgyvoid, SZ_VOIDSTRUCT, 1, Energyvoidfp);
fwrite((char *) &Enrgyvoid, SZ_VOIDSTRUCT, 1, fp);
if ((loc = allocvoid()) > 20L * (long)SZ_VOIDSTRUCT)
fread((char *) &Enrgyvoid, SZ_VOIDSTRUCT, 1, Energyvoidfp);
fwrite((char *) vp, SZ_VOIDSTRUCT, 1, Energyvoidfp);
while (fread((char *) &Enrgyvoid, SZ_VOIDSTRUCT, 1, Energyvoidfp) == 1)
loc += SZ_VOIDSTRUCT;