C
C     DM density modification program
C     Copyright (C) 1994-2004 Kevin Cowtan
C
C     This code is distributed under the terms and conditions of the
C     CCP4 Program Suite Licence Agreement as a CCP4 Application.
C     A copy of the CCP4 licence can be obtained by writing to the
C     CCP4 Secretary, Daresbury Laboratory, Warrington WA4 4AD, UK.
C
C	HEADER FILE FOR DMHARVEST.F
C	Created by Pryank Patel. Last update: 27-04-2004

c	..Common Blocks..
	character package*80,softwarename*80,SoftwareVersion*80
	character CurrBlock*81,CurrCategory*81,DEPOSITFNAME*256
	character projectname*64,datasetname*64
      	COMMON /pccifChar/CurrBlock,CurrCategory,Package,SoftwareName,
     +	SoftwareVersion,DEPOSITFNAME,projectname,datasetname
      	LOGICAL noharvest,usecwd,private
	common /pnoha/noharvest,usecwd,private
      	REAL ValueNotDet
      	COMMON /pDcif/ValueNotDet
C     ..
	CHARACTER CIFTIME*50,VERSION*30
	INTEGER IVALND
	REAL VALND
	INTEGER ROWSIZE
	INTEGER a,b
	INTEGER Hmaxbin,Hnres
	PARAMETER (Hmaxbin=30)
	REAL Hrres(Hmaxbin+1),Hrefls(Hmaxbin),Hsfomn(Hmaxbin)
	REAL Hsphicn(Hmaxbin)
	COMMON /pHarvestStats/ Hrres,Hrefls,Hsfomn,Hsphicn,Hnres