LCPQ/irpf90
10
0
Fork 0
mirror of https://gitlab.com/scemama/irpf90.git synced 2025-01-03 01:55:42 +01:00
Code Releases Activity

Merge with TApplencourt

Browse Source
This commit is contained in:
Anthony Scemama 2017-07-11 23:18:26 +02:00
parent ddfe8d9d18
commit abca1022c7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/entity.py
View File

@ -478,7 +478,7 @@ class Entity(object):
" if (allocated(%s)) then"%(name), " if (allocated(%s)) then"%(name),
" deallocate (%s)"%(name)] " deallocate (%s)"%(name)]
if command_line.do_memory: if command_line.do_memory:
result += " print *, 'Deallocating %s'"%(name) result += [ " print *, 'Deallocating %s'"%(name) ]
result += [" endif"] result += [" endif"]
@ -552,7 +552,7 @@ class Entity(object):
if command_line.do_memory: if command_line.do_memory:
tmp = "\n print *, %s, 'Allocating %s(%s)'" tmp = "\n print *, %s, 'Allocating %s(%s)'"
d = ','.join(self.dim) d = ','.join(self.dim)
result += tmp % ('size(' + name + ')', name, d) result += tmp % ('size(' + name + ')', name, d)
return result return result
result = [" if (allocated (%s) ) then" % (name)] result = [" if (allocated (%s) ) then" % (name)]