anchor.diff:              call init_system(sys)
               call read_in_integrals(sys, cas_info=sys%cas)
               call init_generic_system_basis(sys)
  +            call print_pg_symmetry_info(sys)
           end if
   
           call warn_unused_args(lua_state, keys, opts)
  
positive.code:             call init_system(sys)
              call init_model_basis_fns(sys)
              call init_generic_system_basis(sys)
          end if
  
          call warn_unused_args(lua_state, keys, opts)
  
negative.code:         use lua_hande_utils, only: warn_unused_args
          use system, only: sys_t, hub_real, init_system
          use basis, only: init_model_basis_fns
          use real_lattice, only: init_real_space
  
          integer(c_int) :: nreturn
          type(c_ptr), value :: L
  