erbium doped waveguideamplifiers

Hi

I need the erbium doped waveguide amplifier matlab code, i am facing problem in writting the code if any one have plz post me as early as possible.