The 1, 2, 3 dimensional histogram routines. The programs can be
compliled only by Intel Fortran 90/95. (Absoft fortran 90/95 is
unable to compile them).  The programs need to use dyanmic
array allocation inside a structure; this feature is not supported by
Abost.  To use these prorams, just specify the *.o in the link 
process.

compile k90*.f in this directory and make
object by

ifort -c k90*.f


A)  3D histogram.  overlap display (xyz)
	do i =  ..	
	   do j = ..
      	    call kwhistp3( h(i,j) ...)
           enddo
	enddo
           each *.dat ccontaines spectram of Z in the specified (X,Y) region.
           dir(i) is the name dependent on i
	   dir(j) is the name dependetn on j
	maindir/what/dir(i)/dir(j)/dirX1/fileY1.dat   
	maindir/what/dir(i)/dir(j)/dirX1/fileY2.dat   
...

	 fileY1.dat ... to fileYn.dat will be overlapped
 
	maindir/what/dir(i)/dir(j)/dirX2/fileY1.dat   
	maindir/what/dir(i)/dir(j)/dirX2/fileY2.dat 
...
	...
	 fileY1.dat ... to fileYn.dat will be overlapped

B)  2D histogram   overlap display (XY)

	do i =  ..	
	   do j = ..
      	    call kwhistp2( h(i,j) ...)
           enddo
	enddo
           each *.dat ccontaines spectram of Y in the specified (X) region.
           dir(i) is the name dependent on i
	   dir(j) is the name dependetn on j
	maindir/what/dir(i)/dir(j)/fileX1.dat   
	maindir/what/dir(i)/dir(j)/fileX2.dat   
...

	 fileX1.dat ... to fileXn.dat will be overlapped
 
	maindir/what/dir(i)/dir(j)/fileX1.dat   
	maindir/what/dir(i)/dir(j)/fileX2.dat 
...
	...
	 fileX1.dat ... to fileXn.dat will be overlapped

C )  1D histogram   overlap display (X)

	do i =  ..	
	   do j = ..
      	    call kwhistp( h(i,j) ...)
           enddo
	enddo
           each *.dat ccontaines spectram of X 
           dir(i) is the name dependent on i
	   file(j) is the name dependetn on j (fileJ1, fileJ2...)
	maindir/what/dir(i)/fileJ1.dat   
	maindir/what/dir(i)/fileJ2.dat   
...

	 fileJ1.dat ... to fileJn.dat will be overlapped
 
	maindir/what/dir(i)/fileJ1.dat   
	maindir/what/dir(i)/fileJ2.dat 
...
	...
	 fileJ1.dat ... to fileJn.dat will be overlapped


----------------
split histograms:

maindir/1Dhist/lat/g/depth1
                    /depth2
	            /...
      	          /e/depth1
	            /depth2
	            /...
	          /m/depth1
	            /depth2
	            /...
	      /elosslat/e/depth1
                         ...
	               /m/depth1
	                 ...
	               /a/depth1
	                 ...
            ...
       /2Dhist/respec/g/depth1/r1
                              /r2 
	                      /..
                       /depth2/r1
	                      /r2
	                    ...
	                 ...
	            /e/depth1/r1
                     ...

	            /m/depth1/r1
	             ...
             ...
        /3Dhist/retsepc/g/depth1/r1/E1
	                           /E2
                    ...
	                /depth2/r1/E1
                      ...
                      /e/depth1/r1/E1
               ...



-------
#d not given.
#c not given.  
	all plots are gathered  in maindir/

#d not given.
#c given
	maindir/categ is created

#d given
	maindir/dir is created



gawk: /home/Users/kasahara/Cosmos/Scrpt/splithisto.awk:78: (FILENAME=temp.ahist FNR=120314) fatal: can't redirect to `Plot/rez/Photons/d600/r4/plot.gp' (No such file or directory)
