external random_init necessary for gfortran 9.3

[unres.git] / source / unres / src_MD / readrtns.F

diff --git a/source/unres/src_MD/readrtns.F b/source/unres/src_MD/readrtns.F
index fc49c33..6dc1fa1 100644 (file)
--- a/source/unres/src_MD/readrtns.F
+++ b/source/unres/src_MD/readrtns.F
@@ -89,6 +89,7 @@ csa      include 'COMMON.CSA'
       character*8 diagmeth(0:3) /'Library','EVVRSP','Givens','Jacobi'/
       character*80 ucase
       character*320 controlcard
+      external random_init
 
       nglob_csa=0
       eglob_csa=1d99