|
a/RandomLib.mod.m2pp |
|
b/RandomLib.mod.m2pp |
|
... |
|
... |
51 |
(* aber der mit RLuxUt/RLuxGo&RLuxIn. Wenn K1+K2=0 ist alles gut. *)
|
51 |
(* aber der mit RLuxUt/RLuxGo&RLuxIn. Wenn K1+K2=0 ist alles gut. *)
|
52 |
(* Dir Fortran-Routine verhaelt sich aber auch so ... *)
|
52 |
(* Dir Fortran-Routine verhaelt sich aber auch so ... *)
|
53 |
(* - Herausnahme der debug-optionen in RanLux (ersetzen durch *)
|
53 |
(* - Herausnahme der debug-optionen in RanLux (ersetzen durch *)
|
54 |
(* Praeprozessor-direktiven). *)
|
54 |
(* Praeprozessor-direktiven). *)
|
55 |
(*------------------------------------------------------------------------*)
|
55 |
(*------------------------------------------------------------------------*)
|
|
|
56 |
(* For procedure Random see the ACM licence terms at *)
|
|
|
57 |
(* https://www.acm.org/publications/policies/software-copyright-notice, *)
|
|
|
58 |
(* all other routines are under the LGPL. *)
|
|
|
59 |
(* *)
|
56 |
(* Implementation : Michael Riedl *)
|
60 |
(* Implementation : Michael Riedl *)
|
57 |
(* Licence : GNU Lesser General Public License (LGPL) *)
|
61 |
(* Licence : GNU Lesser General Public License (LGPL) *)
|
58 |
(*------------------------------------------------------------------------*)
|
62 |
(*------------------------------------------------------------------------*)
|
59 |
|
63 |
|
60 |
(* $Id: RandomLib.mod.m2pp,v 1.7 2018/01/16 09:19:51 mriedl Exp mriedl $ *)
|
64 |
(* $Id: RandomLib.mod.m2pp,v 1.7 2018/01/16 09:19:51 mriedl Exp mriedl $ *)
|