Source: https://www-elec.inaoep.mx/~rogerio/Tres/MatLab 7