[cs-lisp] Impromptu ve canli programlama

2008-08-17 Başlik Aykut Caglayan
Son zamanlarda Chuck, Pd ve Impromptu gibi araclarla, live coding bilgisayar 
muzigi icrasina yeni iddialar getirmistir. 

http://toplap.org/index.php/Main_Page

Gecen hafta UK'nin bir yerinde gerceklestirilen live coding gecesinden 
video'lar icin su linke bakiniz. Kullanilan sentaks Scheme'dir.

http://impromptu.moso.com.au/gallery.html



  


___
cs-lisp mailing list
cs-lisp@cs.bilgi.edu.tr
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp


[cs-lisp] Float'u en yakin Integer'e nasil yuvarlarim?

2008-05-25 Başlik Aykut Caglayan
Selamlar

ornegin 2.6 ise 3.0; 2.4 ise 2.0; 2.5 ise de 2.0 olmali.

Bunun adi interpolation midir?




  


___
cs-lisp mailing list
cs-lisp@cs.bilgi.edu.tr
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp


[cs-lisp] Liste elemanlari siralamasi sorunu..

2008-04-30 Başlik Aykut Caglayan
Selamlar, Chris'in cevabini scheme sentaksinda yazildigi icin kullanamadim. 
VolkanYazici'nin asagidaki onerisini kullandim. 

(defun karistir (lst) 
  (sort lst
   #'
   :key (lambda (item)
  (declare (ignore item))
  (random 1.0

Ancak bu kodu 'loop'a oturttugumda

CM (defun luup (kere)
  (loop for i from 0 to kere collect (nth (mod i 7) (karistir '(a b c d e f 
g)

CM (luup 10)
(A B NIL NIL NIL NIL NIL A NIL NIL NIL)

bu cevabi aliyorum. Dolayisyla isime yarayamiyor__

Onerisi olan..?


  

Be a better friend, newshound, and 
know-it-all with Yahoo! Mobile.  Try it now.  
http://mobile.yahoo.com/;_ylt=Ahu06i62sR8HDtDypao8Wcj9tAcJ


___
cs-lisp mailing list
cs-lisp@cs.bilgi.edu.tr
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp


[cs-lisp] Aquamacs-CM'de calismadi; LispWorks Personal'de calisti

2008-04-30 Başlik Aykut Caglayan
(defun karistir (lst)
  (sort lst
   #'
   :key (lambda (item)
  (declare (ignore item))
  (random 1.0

(defun luup (kere)
  (loop for i from 0 to kere collect (nth (mod i 7) (karistir '(a b c d e f 
g)


GNU Emacs 22.1.1 (i386-apple-darwin8.10.1, Carbon Version 1.6.0)
 of 2007-07-22 on plume.sr.unh.edu - Aquamacs Distribution 1.1
SLIME 2007-01-07
Common Music 2.10.0' de calismadi

Bi de LispWorks'de denedim, calisti__

Kor talih bu mu?


  

Be a better friend, newshound, and 
know-it-all with Yahoo! Mobile.  Try it now.  
http://mobile.yahoo.com/;_ylt=Ahu06i62sR8HDtDypao8Wcj9tAcJ


___
cs-lisp mailing list
cs-lisp@cs.bilgi.edu.tr
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp


[cs-lisp] Liste elemanlarinin siralamasini degistirmek

2008-04-27 Başlik Aykut Caglayan
Ornegin soyle bir listem var '(a b c)  

bu listeyi cagirdigimda ongoremedigim (randomized) bir siralamayla gelmesini 
istiyorum; 
Ornegin '(b a c) olarak__

Eminim bunun da cok basit bir yolu vardir benim bulamadigim_

Tesekkurler



  

Be a better friend, newshound, and 
know-it-all with Yahoo! Mobile.  Try it now.  
http://mobile.yahoo.com/;_ylt=Ahu06i62sR8HDtDypao8Wcj9tAcJ


___
cs-lisp mailing list
cs-lisp@cs.bilgi.edu.tr
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp


[cs-lisp] nerde kalmistik.?

2008-02-02 Başlik Aykut Caglayan
(defun my-replace (lst)
  (cond ((null lst) '())
((eq (car lst) 'a) (append (list 'e) (my-replace (cdr lst
((eq (car lst) 'b) (append (list 'd) (my-replace (cdr lst
(t (append (list (car lst)) (my-replace (cdr lst))
   
  Bu sablonu L-sistem'i ya da bir fraktallik uygulamasina nasil cevirebilirim?
   
  Yani (null lst) true dondugunde sona erdirilen dongu sonucu bize verilen yeni 
listeyi, istedigim kereler ayni muameleye tabi tutmak istiyorum.

   

   
-
Be a better friend, newshound, and know-it-all with Yahoo! Mobile.  Try it now.___
cs-lisp mailing list
cs-lisp@cs.bilgi.edu.tr
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp