version 1.18, 2011/04/14 09:57:15
|
version 1.34, 2012/04/03 13:38:26
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.0.prerelease.0 |
RPL/2 (R) version 4.1.7 |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
Copyright (C) 1989-2012 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 138 integrale_romberg(struct_processus *s_et
|
Line 138 integrale_romberg(struct_processus *s_et
|
do |
do |
{ |
{ |
h = (b - a) / (nombre_elements = (1ULL << (++n))); |
h = (b - a) / (nombre_elements = (1ULL << (++n))); |
|
|
|
if (((unsigned long) nombre_elements) == 0) |
|
{ |
|
// Dépassement de capacité |
|
n--; |
|
break; |
|
} |
|
|
x = a; |
x = a; |
|
|
/* |
/* |