Text this: Numerical recipes in Pascal :