diff options
Diffstat (limited to 'Dragon/src/LIBA30.f')
| -rw-r--r-- | Dragon/src/LIBA30.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Dragon/src/LIBA30.f b/Dragon/src/LIBA30.f index 7c5e47a..8f5043f 100644 --- a/Dragon/src/LIBA30.f +++ b/Dragon/src/LIBA30.f @@ -430,7 +430,7 @@ *---- WRITE(RECNAM,'(9HIsotopes/,A,11H/HomoRates/)') TRIM(HNISOR) IF(.NOT.hdf5_group_exists(IPAP2,TRIM(RECNAM))) THEN - WRITE(HSMG,'(38HLIBA30: missing HomoRates in group ,A,1H.)') + WRITE(HSMG,'(35HLIBA30: missing HomoRates in group ,A,1H.)') 1 TRIM(RECNAM) CALL XABORT(HSMG) ENDIF |