Anubis / Anubis

 *Project*                     Anubis
   
 *Title*              very simple unix like ls. 
   
 *Copyright*       Copyright (c) Alain Prouté 2005. 

   
   
   
   
 *Author*       David René
 *Created*      december 2005
 *Status*       Released  
      
 *Overview* This a really the first Anubis program of David. 
   
   
define One printList ( List (String) liste)=
  if liste is 
  {
    [ ] then unique,      //if the list is empty, we do nothing and we go out
    [ h . t] then 
      print(h +"\n"); 
      printList(t)        //here we print the first iteration and call function 
                          //for print the rest of the list
  }.

global define One als( List(String) args ) =
  printList(directory_list( ".", "*")).