diff options
| author | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
|---|---|---|
| committer | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
| commit | 40e5a5811c6ffce9b0974e93cdd927cbcf60c157 (patch) | |
| tree | 4464880c571602d54f6ae114729bf62a89518057 /noao/imred/hydra/demos/mkbig.cl | |
| download | iraf-osx-40e5a5811c6ffce9b0974e93cdd927cbcf60c157.tar.gz | |
Repatch (from linux) of OSX IRAF
Diffstat (limited to 'noao/imred/hydra/demos/mkbig.cl')
| -rw-r--r-- | noao/imred/hydra/demos/mkbig.cl | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/noao/imred/hydra/demos/mkbig.cl b/noao/imred/hydra/demos/mkbig.cl new file mode 100644 index 00000000..80b88572 --- /dev/null +++ b/noao/imred/hydra/demos/mkbig.cl @@ -0,0 +1,29 @@ +# Create demo data if needed. + +artdata +artdata.nxc = 5 +artdata.nyc = 5 +artdata.nxsub = 10 +artdata.nysub = 10 +artdata.nxgsub = 5 +artdata.nygsub = 5 +artdata.dynrange = 100000. +artdata.psfrange = 10. +artdata.ranbuf = 0 + +mkfibers ("demoobj", type="object", fibers="demos$mkbig.dat", + title="Hydra artificial image", header="demos$header.dat", + ncols=1500, nlines=256, wstart=5786., wend=7362., seed=1) +mkfibers ("demoflat", type="flat", fibers="demos$mkbig.dat", + title="Hydra artificial image", header="demos$header.dat", + ncols=1500, nlines=256, wstart=5786., wend=7362., seed=2) +mkfibers ("demoarc", type="henear", fibers="demos$mkbig.dat", + title="Hydra artificial image", header="demos$header.dat", + ncols=1500, nlines=256, wstart=5786., wend=7362., seed=3) + +# Create the setup files. +delete ("demoapid", verify=no, >& "dev$null") +list = "demos$mkbig.dat" +while (fscan (list, i, j) != EOF) + print (i, j, >> "demoapid") +list = "" |