aboutsummaryrefslogtreecommitdiff
path: root/noao/twodspec/longslit/demos/mktestt.cl
diff options
context:
space:
mode:
authorJoe Hunkeler <jhunkeler@gmail.com>2015-08-11 16:51:37 -0400
committerJoe Hunkeler <jhunkeler@gmail.com>2015-08-11 16:51:37 -0400
commit40e5a5811c6ffce9b0974e93cdd927cbcf60c157 (patch)
tree4464880c571602d54f6ae114729bf62a89518057 /noao/twodspec/longslit/demos/mktestt.cl
downloadiraf-osx-40e5a5811c6ffce9b0974e93cdd927cbcf60c157.tar.gz
Repatch (from linux) of OSX IRAF
Diffstat (limited to 'noao/twodspec/longslit/demos/mktestt.cl')
-rw-r--r--noao/twodspec/longslit/demos/mktestt.cl38
1 files changed, 38 insertions, 0 deletions
diff --git a/noao/twodspec/longslit/demos/mktestt.cl b/noao/twodspec/longslit/demos/mktestt.cl
new file mode 100644
index 00000000..a60d8ad7
--- /dev/null
+++ b/noao/twodspec/longslit/demos/mktestt.cl
@@ -0,0 +1,38 @@
+# 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
+
+mkexample ("longslit", "Demoflat", oseed=4, nseed=3,
+ errors=no, verbose=yes, list=no)
+mkheader ("Demoflat", "demos$demoflat.dat", append=no, verbose=no)
+mkexample ("longslit", "Demoarc1", oseed=5, nseed=1,
+ errors=no, verbose=yes, list=no)
+mkheader ("Demoarc1", "demos$demoarc1.dat", append=no, verbose=no)
+mkexample ("longslit", "Demoobj", oseed=1, nseed=1,
+ errors=no, verbose=yes, list=no)
+mkheader ("Demoobj", "demos$demoobj.dat", append=no, verbose=no)
+mkexample ("longslit", "Demostd", oseed=2, nseed=2,
+ errors=no, verbose=yes, list=no)
+mkheader ("Demostd", "demos$demostd.dat", append=no, verbose=no)
+mkexample ("longslit", "Demoarc2", oseed=5, nseed=2,
+ errors=no, verbose=yes, list=no)
+mkheader ("Demoarc2", "demos$demoarc2.dat", append=no, verbose=no)
+
+print ("Transposing images...")
+imtranspose ("Demoflat,Demoarc1,Demoobj,Demostd,Demoarc2",
+ "demoflat,demoarc1,demoobj,demostd,demoarc2")
+wcsreset ("demoflat,demoarc1,demoobj,demostd,demoarc2", wcs="physical",
+ verbose=no)
+hedit ("demoflat,demoarc1,demoobj,demostd,demoarc2", "dispaxis", 1,
+ update=yes, verify=no, show=no)
+imtranspose ("demoflat,demoarc1,demoobj,demostd,demoarc2",
+ "demoflat,demoarc1,demoobj,demostd,demoarc2")