From bd7171d346ad4f079aa89b2d9fdd6a56aa0a3b1c Mon Sep 17 00:00:00 2001 From: HEBERT Alain Date: Tue, 23 Dec 2025 11:34:01 -0500 Subject: Resolve "Depreciate use of Version 4 and 5.0 Draglibs" --- Donjon/src/DONDRV.F | 6 ------ 1 file changed, 6 deletions(-) (limited to 'Donjon/src/DONDRV.F') diff --git a/Donjon/src/DONDRV.F b/Donjon/src/DONDRV.F index ee42c61..1b269d7 100644 --- a/Donjon/src/DONDRV.F +++ b/Donjon/src/DONDRV.F @@ -298,12 +298,6 @@ NAM='A. HEBERT' WRITE(IOUT,1000)HMODUL,COD,DSR,NAM CALL IDET(NENTRY,HENTRY,IENTRY,JENTRY,KENTRY) - ELSE IF(HMODUL.EQ.'FPSPH:') THEN - COD='DONJON' - DSR='SINGLE SPH FACTOR FIXED POINT ITERATION' - NAM='A. HEBERT' - WRITE(IOUT,1000)HMODUL,COD,DSR,NAM - CALL FPSPH(NENTRY,HENTRY,IENTRY,JENTRY,KENTRY) ELSE DONMOD=.FALSE. DONDRV=KDRDRV(HMODUL,NENTRY,HENTRY,IENTRY,JENTRY,KENTRY) -- cgit v1.2.3