generic                                                         --ezutan a kulcsszo utan jonnek a generikus (sablon) csomag parameterei

    type lap is private;                                        --egy tipus, amit egyelore egyaltalan nem ismerunk  ("valamilyen tipusu kartya" (pl.: magyar,francia) egy lapjanak tipusa)
    with function "<"(A:lap;B:lap) return boolean;              --es egy rendezes ezen a tipuson, azaz ami megmondja milyen elv szerint lehet sorbatenni a lapokat, igy egy sorrendet definial alapok kozott

package kartyacsomag is                                         --milyen csomag? ... kartyacsomag... :)
        
   
   type kartyapakli is array(positive range <>) of lap;         --a kartyapaklink, amirol meg nem tudjuk ugyan, hogy hany elemu lesz, de azt tudjuk, hogy lap-okat tartalmaz majd
  
  
   procedure rendez(kp: in out kartyapakli);                    --az eljaras, ami egy maximumkivalasztasos rendezessel berendezi a kp kartyapakli-t, (itt hasznaljuk fel a rendezest a lapok kozott!!!)
 

end kartyacsomag;