Create trunc_al_disprot

matlab function