#!/usr/bin/perl -w # NEEDED TO MAKE USE OF READPARSE ROUTINE print "Content-type: text/html\n\n"; print " \n"; print " \n"; print " \n"; print "
\n"; print "

An IMF Calculator

\n"; print "

\n"; print "

\n"; print "Version: 2 November 2001
\n"; print "Enter inputs to a burst of star formation\n"; print " \n"; print "

\n"; print " Note: all fields must be filled in for this form to work;
\n"; print " Oxygen 16 yields are from Woosley & Weaver 1995 for 0.1 and 1.0 solar metallcity \n"; print "


\n"; print "

Inputs:

\n"; print "IMF ( -2.35 = Salpeter; -0.1 > imf > -5.0):
\n"; print "Mlow : \n"; print "Mup : \n"; print "Total Mass of Stars (in solar masses) : \n"; print "
\n"; print "Metallicity (1.0=solar): \n"; print "

\n"; print "Stellar Yields from?: Woosley & Weaver '95 Maeder '92 \n"; print "Note: You must use WW95 yields if you want Fe and H+He ejecta masses \n"; print "

\n"; print "Lower mass limit for yield integration (e.g., 15 Msun): \n"; print "Upper mass limit for yield integration (e.g., 35 Msun): \n"; print "

\n"; print "Factor by which to alter Fe yields from WW95 (prefer default=1.0): \n"; print "

\n"; print "Mass of ambient material to mix with ejecta (solar masses): \n"; print "

\n"; print "Metallicity of ambient material (1.0=solar): \n"; print "

\n"; print "

Outputs:

\n"; print "Stellar mass Range | Nstars | Ncumulative | Mstars | Mcumulative | O16Mass | O16Cum | H+HeMass | H+HeCum | FeMass | FeCum \n"; print "

\n"; print "

\n"; print "
\n"; print "Click on 'Compute' or 'Clear Boxes' to clear the above text boxes and try again.
\n"; print " \n"; print "

\n"; print "

\n"; print "
\n"; # NOW CALL THE SUBROUTINE TO GET VARIABLES FROM THE FORM exit(0);