diff options
| author | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-12-23 11:34:01 -0500 |
|---|---|---|
| committer | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-12-23 11:34:01 -0500 |
| commit | bd7171d346ad4f079aa89b2d9fdd6a56aa0a3b1c (patch) | |
| tree | ff7bea851c1ce9685d26fc5080f65fcf9110086b /Dragon/src/KDRDRV.F | |
| parent | 0fbdc50700be08e00ecad828d9c99b5c045b382b (diff) | |
Resolve "Depreciate use of Version 4 and 5.0 Draglibs"
Diffstat (limited to 'Dragon/src/KDRDRV.F')
| -rw-r--r-- | Dragon/src/KDRDRV.F | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Dragon/src/KDRDRV.F b/Dragon/src/KDRDRV.F index 0aed297..1e63352 100644 --- a/Dragon/src/KDRDRV.F +++ b/Dragon/src/KDRDRV.F @@ -127,6 +127,8 @@ CALL FMT(NENTRY,HENTRY,IENTRY,JENTRY,KENTRY) ELSE IF(HMODUL.EQ.'SPH:') THEN CALL SPH(NENTRY,HENTRY,IENTRY,JENTRY,KENTRY) + ELSE IF(HMODUL.EQ.'FPSPH:') THEN + CALL FPSPH(NENTRY,HENTRY,IENTRY,JENTRY,KENTRY) ELSE IF(HMODUL.EQ.'CFC:') THEN CALL CFC(NENTRY,HENTRY,IENTRY,JENTRY,KENTRY) ELSE IF(HMODUL.EQ.'SENS:') THEN |