X-Git-Url: http://git.uio.no/git/?a=blobdiff_plain;f=MICROCERN%2Fgauss.F;h=ccb353796123905b0fff31cf8d2d6e69735be4c4;hb=23904d1648087ce6461f62c17d38caf6534f9847;hp=85e5360f112aa51bb66822180921c5a3f305eacd;hpb=88cb7938ca21d4a80991d4e7aa564008c29340f7;p=u%2Fmrichter%2FAliRoot.git diff --git a/MICROCERN/gauss.F b/MICROCERN/gauss.F index 85e5360f112..ccb35379612 100644 --- a/MICROCERN/gauss.F +++ b/MICROCERN/gauss.F @@ -1,23 +1,6 @@ * * $Id$ * -* $Log$ -* Revision 1.2.4.1 2002/11/26 16:46:57 hristov -* Merging NewIO with v3-09-04 -* -* Revision 1.2 2002/10/14 14:57:10 hristov -* Merging the VirtualMC branch to the main development branch (HEAD) -* -* Revision 1.1.2.1 2002/07/11 17:14:48 alibrary -* Adding MICROCERN -* -* Revision 1.1.1.1 1999/05/18 15:55:34 fca -* AliRoot sources -* -* Revision 1.1.1.1 1996/04/01 15:02:13 mclareni -* Mathlib gen -* -* #include "gen/pilot.h" C This will be GAUSS,IF=DOUBLE and GAUSS64,IF=-DOUBLE. FUNCTION GAUSS(F,A,B,EPS)