*CDK PHOTOF                                                                        PHOTOF.1         
      COMMON/PHOTO/XNO(7)                                                          PHOTOF.2