diff options
| author | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-10-19 03:56:49 -0400 |
|---|---|---|
| committer | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-10-19 03:56:49 -0400 |
| commit | f00eea9ff4dd094374672f5ef73939ed6a4dd9d5 (patch) | |
| tree | 5b0e7f0bdf47079c50e6af665a3b42380cc5730b | |
| parent | 1c8ce8509ac14a1457f4ad4919116f160b189d3b (diff) | |
| parent | 28cd9c9d1fed6cd8cf1b579de71fbc7c9e13c712 (diff) | |
Merge branch '7-missing-param-group-in-apex-datafile-produced-by-module-apx' into 'main'
#7: Continue the commit
See merge request dragon/5.1!12
| -rw-r--r-- | Dragon/src/APXCAT.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Dragon/src/APXCAT.f b/Dragon/src/APXCAT.f index ba1cf25..3367096 100644 --- a/Dragon/src/APXCAT.f +++ b/Dragon/src/APXCAT.f @@ -161,7 +161,7 @@ CALL APXPAV(IPAPX,IPARN,NPAR,PARFMT_RHS(IPAR),FLOTT,NITMA, 1 TEXT12,MUPLET(IPARN),LGNEW(IPARN)) 100 CONTINUE - DEALLOCATE(PARNAM_RHS,PARFMT_RHS,PARNAM_LHS) + DEALLOCATE(PARNAM_RHS,PARFMT_RHS) *---- * UPDATE THE PARAMETER TREE IN THE OUTPUT APEX FILE *---- @@ -281,7 +281,7 @@ DEALLOCATE(VCHAR) ENDIF 170 CONTINUE - DEALLOCATE(PARFMT_LHS) + DEALLOCATE(PARNAM_LHS,PARFMT_LHS) 180 CONTINUE * END OF LOOP ON ELEMENTARY CALCULATIONS. ******************** RETURN |