# HG changeset patch
# User abarth93
# Date 1166389318 0
# Node ID 8f24e10508f7e4cebb794798e6d4235952dd08eb
# Parent  7088851def1d2460018c6915e4ca94adc2d02a68
Fix example

diff -r 7088851def1d -r 8f24e10508f7 main/optiminterp/src/example_optiminterp.F90
--- a/main/optiminterp/src/example_optiminterp.F90	Fri Dec 15 16:16:38 2006 +0000
+++ b/main/optiminterp/src/example_optiminterp.F90	Sun Dec 17 21:01:58 2006 +0000
@@ -53,8 +53,7 @@
  ! random_number in the hope that the results will be
  ! platform independent
 
- integer(8), parameter :: A = 1664525_8, B = 1013904223_8,
- &              Mo = 4294967296_8
+ integer(8), parameter :: A = 1664525_8, B = 1013904223_8, Mo = 4294967296_8
  integer(8) :: next = 0_8