/prep7 mplist alls *get,enum,elem,,count *dowhile,enum *get,etype,elem,elnext(0),attr,type *get,enam,etyp,etype,attr,enam *if,enam,eq,227,then et,etype,227,11 !für ux,uy,uz,temp *elseif,enam,eq,226,then et,etype,226,11 !für ux,uy,uz,temp *endif esel,u,type,,etype *get,enum,elem,,count *enddo alls etlist