Commits

Manuel Hasert committed b777f2c

pushing example. have a look at the testsuite/debug/cube_refined
and check dbgOut0000001.res

  • Participants
  • Parent commits d18ced4

Comments (0)

Files changed (1)

source/aot_out_module.f90

     end if
     if (present(vname)) then
       if(put_conf%level .ne. 0) then
-        write(put_conf%outunit,fmt="(a,i2)",advance ='no') trim(vname)//"=", val
+        write(put_conf%outunit,fmt="(a,i2)",advance ='no') trim(vname)//" = ", val
       else
-        write(put_conf%outunit,fmt="(a,i2)") trim(vname)//"=", val
+        write(put_conf%outunit,fmt="(a,i2)") trim(vname)//" = ", val
       end if 
     else
       if(put_conf%level .ne. 0) then