diff options
| author | Alain Hebert <alainhebert@Alains-MacBook-Pro.local> | 2025-10-19 09:19:38 +0200 |
|---|---|---|
| committer | Alain Hebert <alainhebert@Alains-MacBook-Pro.local> | 2025-10-19 09:19:38 +0200 |
| commit | 28cd9c9d1fed6cd8cf1b579de71fbc7c9e13c712 (patch) | |
| tree | 5b0e7f0bdf47079c50e6af665a3b42380cc5730b /Dragon/src | |
| parent | 4dfbb001df4d32309b1b0d3553e5eb7717b9914c (diff) | |
#7: Continue the commit
Diffstat (limited to 'Dragon/src')
| -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 |