anchor.diff:  
           ! [todo] - return estimate of various canonical mean-field energies and error to lua.
           nresult = 0
  +
  +        call wrapper_end_report("Calculation finished at", start_wall_time, start_cpu_time, .false.)
   
       end function lua_canonical_estimates
   
  
positive.code:         call push_qmc_state(lua_state, qmc_state_out)
          nresult = 1
  
      end function lua_ccmc
  
      function lua_dmqmc(L) result(nresult) bind(c)
  
negative.code:             nresult = nresult + 1
              call aot_table_from_1Darray(lua_state, opts, sampling_probs)
          end if
  
          call wrapper_end_report("DMQMC calculation finished at", start_wall_time, start_cpu_time, .false.)
  
      end function lua_dmqmc
  
  