Changeset 843 for trunk/stac/scripts/fakeimage.c
- Timestamp:
- Jun 3, 2004, 10:03:58 AM (22 years ago)
- File:
-
- 1 edited
-
trunk/stac/scripts/fakeimage.c (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/stac/scripts/fakeimage.c
r743 r843 1 1 /* 2 ** $Id: fakeimage.c,v 1. 3 2004-05-20 00:17:00price Exp $2 ** $Id: fakeimage.c,v 1.4 2004-06-03 20:03:58 price Exp $ 3 3 ** Program to make some fake images. 4 4 ** … … 563 563 for (j=minj;j<=maxj;j++) 564 564 for (k=mink;k<=maxk;k++) 565 data[(nx+nxos)*k+j] += flux *exp(-1.0 * ((x-j)*(x-j) + (y-k)*(y-k))/2.0/(seeing/SIGMAtoFWHM)/(seeing/SIGMAtoFWHM));565 data[(nx+nxos)*k+j] += flux/sqrt(2.0*M_PI)/(seeing/SIGMAtoFWHM)*exp(-1.0 * ((x-j)*(x-j) + (y-k)*(y-k))/2.0/(seeing/SIGMAtoFWHM)/(seeing/SIGMAtoFWHM)); 566 566 567 567 }
Note:
See TracChangeset
for help on using the changeset viewer.
