Laboratory for Mathematical Modeling of Multi-core and Multimode Optical Fibers with Applications in Lasers and Telecommunication Systems