get1hyb.f File Reference

Go to the source code of this file.

Modules
module	modzbin2ascii

Functions/Subroutines
subroutine	get1hyb (rew)
subroutine	mergehyb1 (h1)
subroutine	openhyb (icon)

Variables
integer, parameter	ndepth =50
integer	fn1
real *8, dimension(ndepth)	asdep
real *8, dimension(ndepth)	munit
real *8, dimension(ndepth)	esize0
real *8, dimension(ndepth)	age0
real *8, dimension(ndepth)	cogdep0
real *8, dimension(ndepth)	seloss0
real *8, dimension(ndepth)	ng0
real *8, dimension(ndepth)	ne0
real *8, dimension(ndepth)	nmu0
real *8, dimension(ndepth)	nh0
real *8	cog
real *8	cog2
integer	evno0