function tst_fcn_dup () subfcn1 (); subfcn2 (); endfunction function subfcn1 () disp ("First definition of subfcn1"); endfunction function subfcn2 () disp ("calling subfcn2"); endfunction function subfcn1 () disp ("Second definition of subfcn1"); endfunction