Mon Sep  1 21:42:05 1997  Mumit Khan <khan@modi.xraylith.wisc.edu>

	* msetup.F, sur_spline.F, trace_step.F: Check for file open errors.

Fri Aug 29 10:28:26 CDT 1997 Sangeet Singh <singh@fada.xraylith.wisc.edu>
	
	* mirror.F (mirror1): Substituted faulty SIGMAPHA with
	SCAT_FRAC, which correctly computes the fraction of rays
	scattered. 

Sat Jul 26 12:01:45 1997  Mumit Khan <khan@modi.xraylith.wisc.edu>

	Precision fixes and <= 72 char lines fixups.

	* switchinp.F (SWITCH_INP): Initialize IPASS to 0 using DATA.

	* reflec.F (REFLEC): Fix missing comma across cont. lines in
	SAVE statement.

	* input_oe.F (INPUT_OE): Fix for HP BUGGY compiler for 
	FILE_SCR_EXTERNAL.

	* shadowit.F (MAIN): Increase filename variable lengths to 1024.

Fri Jul 11 17:06:59 1997  Mumit Khan <khan@modi.xraylith.wisc.edu>

	* Makefile.in (FSRCS,OBJS,LIBOBJS): + screen_ext.F, - funny.F

	* funny.F: Delete. Implemented 'Not implemented message' for below.

	* screen_ext.F: New file that implements SCREEN_EXTERNAL and
	SCREEN_LOAD_EXTERNAL to handle reading in external slit/stop 
	polygons.

	* reset.F (RESET): Reset FILE_SCR_EXT to 'NONE SPECIFIED'

	* input_oe.F (INPUT_OE): Prompt for External screen poly file.
	Also for CX_SLIT and CZ_SLIT.

	* screen.F (SCREEN): Modify to handle external files. 
	Logic Cleanup for in-rectangle test.
	Also added Centering of rectangle and ellipses in Slits/Solids.

Sat May  3 12:27:52 1997  Mumit Khan <khan@modi.xraylith.wisc.edu>

	* input_oe.F (INPUT_OE): Change the OE Number variable to
	I_OENUM to avoid conflict with IFLAG. Now PROMPT mode works
	correctly.

Thu Apr 10 19:31:33 1997  Mumit Khan <khan@modi.xraylith.wisc.edu>

	* msetup.F (MSETUP): Supply missing 4th parameter to SUR_SPLINE.

	* sur_spline.F (SUR_SPLINE): Initialize return value SPLERR to 0

	* (all files): Attempt to initialize all variables that are
	assumed to be initialized to 0. Unsuccessful by a long shot.
	Compile with the -static, -noautomatic or equivalent.

Tue Apr  8 22:05:19 1997  Mumit Khan <khan@modi.xraylith.wisc.edu>

	* koma1.F (readme): BUG FIX: must include common.blk to get 
	definition of F_EXIT_SHAPE. Was uninitialized garbage.

	* msetup.F (MSETUP): BUG FIX: Initialized FDEBUG to 0. Change
	to 1 to turn on debugging.

	* screen.F (SCREEN): Initialize KK to avoid g77 warning.

Mon Apr  7 14:52:53 CDT 1997 Sangeet Singh <singh@gatekeeper.xraylith.wisc.edu>

	* sur_spline.F (sur_spline): Increased the maximum number of points
	from 101 to 201 when dimensioning CSPL, X, and Y. Also call
	DBCEVL now with a size of 201 instead of 101.

Fri Apr  4 01:30:40 1997 Mumit Khan <khan@modi.xraylith.wisc.edu>

	* switchinp.F (switch_inp): Save IPASS so it survives subsequent
	invocation of SWITCH_INP(). Showed up for Win32. 

Mon Mar 31 13:49:01 1997 Sangeet Singh <singh@gatekeeper.xraylith.wisc.edu>

	* mirror.F (mirror1): Added local integer variable SURFERR to pass 
	to SURFACE as an additional parameter. Use it to tag rays as lost 
	if spline errors occured in the calculation of their intercepts with 
	a mirror defined as a spline error surface.

	* surface.F (surface): Added another calling parameter to keep
	track of spline errors. Local integer variable is named SPLERR
	and is passed to SUR_SPLINE as an additional parameter.

	* sur_spline.F (sur_spline): Added another calling parameter to
	handle the error output of DBCEVL. The local integer variable
	is called SERR.  If there's a spline error, an error value of
	-9 is passed back to SURFACE, and from there to MIRROR.

Thu Jul 11 08:52:28 1996  Mumit Khan <khan@modi.xraylith.wisc.edu>
	
	* mirror.F: Fix args for LEAVE. It was a royal mess.

	* reflec.F, shadowit.F, mirror.F, crystal.F, diffrac.F, funny.F, 
	image.F, imref.F, input_oe.F, intercept.F, koma1.F, koma2.F, 
	kumakhov.F, mosaic.F, msetup.F, optaxis.F, pspect.F, reset.F, 
	restart.F, rotit.F, rotsour.F, screen.F, segment.F, setsour.F, 
	sur_spline.F, surface.F, switchinp.F, trace_step.F, trace.F:
	Include fixes. Uses #include on Unix.

	* Started ChangeLog
