1: function ex61genm 2: % 3: % Writes a data file for ex61 that has a single point at the center as a radiation event 5: fd = PetscOpenFile('ex61.random.1','w'); 6: write(fd,1,'int32'); 7: write(fd,[0.0 .5 .5 1.0],'double'); 8: close(fd);