C AVRGAMPHS
C
C       Version  1.1    RH      05-Oct-1992     include ctf amplitude correction
C       Version  1.2    RH      18-Oct-1992     print out ctf-correction factor.
C       Version  1.3    RH      22-Oct-1992     more spots
C       Version  1.4    RH      25-Mar-1994     delete COMBAMP*QFACTOR
C                                                - FOM sufficient.
C       Version  1.5    RH      10-Nov-1995     SAVEBACK, SAVECTF debug
C       Version  1.6    RH      08-Nov-1999     debug COMBPHASEXX(NMAX)
C       Version  1.7    RH      27-Oct-2000     divide-by-zero for one measurement
C       Version  1.8    RH      12-Apr-2001     check NMAX overflow, give diagnostic
C       Version  1.9    RH      17-Apr-2001     increase NMAX to 5000
C
C
C       Input card data:-
C
C       Card 0          FLAG                    (T or F) post ORIGTILTC ?
C                               FLAG allows merging of ORIGTILT files
C                               with or without ctf values.
C       Card 1          NSER,ZMIN,ZMAX          (*) serial number, z-range.
C       Card 2          IQMAX                   (*) maximum IQ to use.
C       Card 3          A,B,GAMMA               (*) cell dimensions.
C
C       PROGRAM TO OBTAIN WEIGHTED AVERAGE PHASES FROM MERGED LIST
C       INPUT IS OUTPUT FROM ORIGMERG
C       OUTPUT TO INCLUDE EXPERIMENTAL RESIDUAL AND MERGED FOM
C