my %Crediti = ( map {{$_->id=>$_}} @{$crediti});
		      $crediti = [values %Crediti];