← Back to branch summary

~ubuntu-branches/debian/jessie/eso-midas/jessie

« back to all changes in this revision

Viewing changes to stdred/optopus/proc/holesid.prg

  • Committer: Package Import Robot
  • Author(s): Ole Streicher
  • Date: 2014-04-22 14:44:58 UTC
  • Revision ID: package-import@ubuntu.com-20140422144458-okiwi1assxkkiz39
Tags: upstream-13.09pl1.2+dfsg
Import upstream version 13.09pl1.2+dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
stdred/optopus/proc/holesid.prg
 
1
! @(#)holesid.prg       19.1 (ES0-DMD) 02/25/03 14:27:38
 
2
!+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
3
!.IDENTIFICATION: HOLESID.PRG
 
4
!.PURPOSE:        Plot identification numbers close to holes on OPTOPUS plate.
 
5
!.USE:            @s holesid [table] [xpos] [ypos] [ident]
 
6
!.AUTHOR:         Alessandra Gemmo, Department of Astronomy, Padova
 
7
!.VERSION: 910607 AG  Creation
 
8
!-------------------------------------------------------------------------------
 
9
DEFINE/PARAM P1 ? T "Enter table: "
 
10
DEFINE/PARAM P2 ? C "Enter x_column: "
 
11
DEFINE/PARAM P3 ? C "Enter y_column: "
 
12
DEFINE/PARAM P4 ? C "Enter id_column: "
 
13
!
 
14
WRITE/KEYW IN_A 'P1'
 
15
WRITE/KEYW INPUTC/C/1/16 'P2'
 
16
WRITE/KEYW INPUTC/C/17/16 'P3'
 
17
WRITE/KEYW INPUTC/C/33/16 'P4'
 
18
!
 
19
RUN STD_EXE:HOLESID