mirror of
https://github.com/TREX-CoE/trexio.git
synced 2025-01-08 20:33:36 +01:00
Fixed Fortran interface
This commit is contained in:
parent
0cc24bd21e
commit
6ffc4ccfb2
@ -326,7 +326,10 @@ for fname in files_funcs_dsets:
|
|||||||
|
|
||||||
if "$group_dset_f_dims$" in templine2:
|
if "$group_dset_f_dims$" in templine2:
|
||||||
dims = "(" + ",".join([":" for _ in range(params['rank'])]) + ")"
|
dims = "(" + ",".join([":" for _ in range(params['rank'])]) + ")"
|
||||||
if dims == "()": dims = ""
|
if dims == "()":
|
||||||
|
dims = ""
|
||||||
|
else:
|
||||||
|
dims = "(*)"
|
||||||
templine1 = templine2.replace("$group_dset_f_dims$", dims)
|
templine1 = templine2.replace("$group_dset_f_dims$", dims)
|
||||||
templine2 = templine1
|
templine2 = templine1
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user