CG - Center of Gravity

PURPOSE

Compute coordinates of center of gravity of an image with respect to the image center (at NSAM/2 + 1, NROW/2 + 1).

SEE ALSO

CG 3	[Center of Gravity - Radius of gyration]
CG PH	[Center of Gravity - Phase approximation ||]

USAGE

.OPERATION: CG X10,X11

.INPUT FILE: PIC001
[Enter name of image file.]

.THRESHOLD: 0.23
[Only data above the threshold will be used for computation]

NOTES

1. The coordinates of the center of gravity are printed out, and are put into the optional registers appearing in the command line.

2. EXAMPLE: To shift an image into its center of gravity computed for a threshold of T=0.23, one could use the following command sequence:

    
             CG X10,X11 
             PIC001 
             .23 
             SH 
             PIC001 
             SHI001 
             -X10,-X11 
   

SUBROUTINES

CENGR3

CALLER

UTIL1