diff options
Diffstat (limited to 'Dragon')
| -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 |