Modeling of tungsten filament in gas discharge in H− ion source