Minsort+(algml+példa)

A minimumkeresés tétele algml-re lefordítva: code format="xml" 

              <var name='i' as='from'/> </do> </do>

<func name='selectmin'> Do not work on empty array. <var name='array' as='arr' type='Array'/> <var name='minindex' as='mini' type='index of arr'> <var name='mini'> <call func='firstIndex'> <var name='arr' as='array' /> <var name='min'> <op func='indexing'> <var name='arr' /> <var name='mini' /> </op> <do> <for index='i' each='elem' > <call func='next'> <call func='first'> <var name='arr'/> <call func='last'> <var name='arr'/> <do> <if> <op func='greater'> <var name='min'/> <var name='elem'/> </op> <do> ha a jelenlegi kisebb, mint az eddigi legkisebb. <var name='elem'/><var name='min'/> <var name='i'/><var name='mini'/> </do> <do/> </if> </do> </do>

code