diff options
Diffstat (limited to 'noao/digiphot/ptools/tbselect.cl')
| -rw-r--r-- | noao/digiphot/ptools/tbselect.cl | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/noao/digiphot/ptools/tbselect.cl b/noao/digiphot/ptools/tbselect.cl new file mode 100644 index 00000000..2ba294f8 --- /dev/null +++ b/noao/digiphot/ptools/tbselect.cl @@ -0,0 +1,20 @@ +# TBSELECT -- Select records from an APPHOT/DAOPHOT STSDAS table based +# on the value of an expression. + +procedure tbselect (intable, outtable, expr) + +file intable {"", prompt = "Input apphot/daophot tables database(s)"} +file outtable {"", prompt = "Output apphot/daophot tables database(s)"} +string expr {"", prompt = "Boolean expression for record selection"} + +begin + # Declare the local variables. + string tintable, touttable, texpr + + # Get the positional parameters. + tintable = intable + touttable = outtable + texpr = expr + + tselect (tintable, touttable, texpr) +end |