Fix problems in the generator of fortran

AgriculturalModelExchangeInitiative · Oct 22, 2024 · 19a01f5 · 19a01f5
1 parent a56c9e9
commit 19a01f5
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/pycropml/transpiler/generators/fortranGenerator.py b/src/pycropml/transpiler/generators/fortranGenerator.py
@@ -536,7 +536,11 @@ def visit_subroutine_def(self, node):
         self.visit_declaration(newNode) #self.visit_decl(node)         
         if self.initialValue:
             for n in self.initialValue:
-                if len(n.value)>=1 and (isinstance(n.pseudo_type, list) and n.pseudo_type[0] in ("list", "array")):
+                if not isinstance(n.value, list) and isinstance(n.value, Node):
+                    self.write("%s = " %n.name)
+                    self.visit(n.value)
+                    self.newline(node) 
+                elif len(n.value)>=1 and (isinstance(n.pseudo_type, list) and n.pseudo_type[0] in ("list", "array")):
                     self.write("%s = " %n.name)
                     self.write(u'(/')
                     self.comma_separated_list(n.value)