21 Ocak 2010 Perşembe

Bana kanlı mühürler kaldı

O tarih tacirinden

Uçurumlar çığlıklar ve ölüm tarifleri



Bildiğim tüm masallardan topladım acıları

Yakama iliştirdim

Yaşamak dedim adına sığınaklar emzirdim

Bütün sözcükleri yüzleştirdim ateşle

Anlatamadım günlerin cehennemini



Ajans haberlerinde kirleniyor insanlık

Bütün sevinçler çarmıhta hızla yaşlanıyor

Çocuklar

Bozguna uğramış aşk düşürmüş bayrağını

Geceler unutmuş sevişmeleri



Tanrılara bulaştırmak için bu cinneti

Deliyorum aşkın ambargosunu

Yeniden yollara vuruyorum kendimi



Teninden soyunsun artık çığlıklar

Şimdiki zaman'a çekiyorum bütün fiilleri

Bakışlarında köprüledim uçurumları

Uyak olup düşüyorum dünyanın gözlerine

Taze bir çığlığım artık bu kontra mevsiminde

Herkesin biraz 'faili' olduğu

'Meçhul' bir cinayetim şimdi



Bana katliamlar kaldı

O tarih tacirinden

Ağıtlar sürgünler ve muhbir suretleri



Bütün yenilgilerimi temize çektim

Ölüm boy veriyor artık

Düşlerimle suladığım topraklarımda

Gözlerine ayarladım tüm imgeleri



Hicri İzgören



EKLEYEN: DERYAYA ZER :))

14 Ocak 2010 Perşembe

finaller:(

evet okulun en sıkıcı dönemlerini yaşıyoruz şuan final haftası:(biran önce bitmseni diliyorum.bitsin de evime gidecem okadar özledim ki ogünün hayali beni teselli ediyor.mardinim mezopotamyam.......
final haftasaı olduğundan dolyı çok fazla paylaşımda bulunamayabilrim haberiniz olsun:)

10 Ocak 2010 Pazar

shooting problem

%ikinci dereceden türevi verilen denklemleri çözerken iki tane birinci

%türeve parçalayarak çözülür burda z brinci dereceden türev t ikinci dereceden türev olmak üzre t(1) ve t(başka değer) veriliyor
%amaç verilen t degerlerinden yola çıkarak z(1) degerini bulmak
%f fonksiyon   dosyasını f.m olarak açmayı unutmayın!!!

disp('baslangıc degerlerini giriniz:t(x)=p ve t(k)=l formatında olmalı' );

x=input('x:');

p=input('p:');

k=input('k:');

l=input('l:');

h=input('h:');

n=(k-x)/h;

t(1)=p;

buyukdeger=0;

kucukdeger=0;

a=0;

b=0;

z(1)=input('z için tahmini degeri girniz:');

while(1)



for i=1:n

t(i+1)=t(i)+z(i)*h;

z(i+1)=z(i)+(f(t(i)))*h%/verilen tahmini degrden yola çıkılarak yapılır

end

if(a==1 && b==1)% bir buyuk bir kucuk deger bulmuşsa yetr demek

break;

end

if(t(n+1)>l)

buyukdeger=t(n+1)

zbuyuk=z(1)

if(b==0)%kucuk deger bulmamışsan git kucuk degr bul

disp('daha kucuk bir z tahmini degeri girniz:')

z(1)=input('z(1):');

end

a=1;%kucuk deger buldugunu kanıtlamak için

else

kucukdeger=t(n+1)

zkucuk=z(1)

if(a==0)%buyuk degr bulmamışsan git buyuk deger bul

disp('daha buyuk bir z(1) degeri girniz');

z(1)=input('z(1):');

end

b=1;%kucuk degr bulduğunu kanıtlamak için

end

end

z(1)=zkucuk+((zbuyuk-zkucuk)/(buyukdeger-kucukdeger))*(l-kucukdeger);

fprintf('znin gercek degeri=%f',z(1));
  f FONKSİYONU
%ikinci türevin denklemi


function y=f(t);

y=0.01*t-0.2;
OUTPUT
baslangıc degerlerini giriniz:t(x)=p ve t(k)=l formatında olmalı


x:0

p:40

k:10

l:200

h:2

z için tahmini degeri girniz:17
buyukdeger =231.8144
zbuyuk =
17
daha kucuk bir z tahmini degeri girniz:
z(1):16
buyukdeger =
221.0112
zbuyuk =16
daha kucuk bir z tahmini degeri girniz:
z(1):12
kucukdeger =177.7984
zkucuk =12

znin gercek degeri=14.055095

solving systems of ODEs...(ikinci dereceden türevi olan sistemleri çözmek)

%ikinci dereceden türevi verilen denklemleri çözmek için o ikinci dereceyi

%iki tane birinci dereceye parçalayarak çözeriz y dediğim birinci
%dereceden türev,z ikinci dereceden türev değri
%f dosyasını açmayı unutmayın
disp('baslangıc degerlerni griniz:');

y(1)=input('y(1):');

z(1)=input('z(1)');

h=input('h:');

a=input('üst sınır degri:');

b=input('alt sınır degeri');

n=(b-a)/h;

x=a:h:b;

for i=1:n

y(i+1)=y(i)+z(i)*h;

z(i+1)=z(i)+f(x(i),y(i))*h;

end

fprintf('ikinci türev degeri=%f',z(n+1));

f FONKSİYONU

function y=f(x,t);

y=x-t;

OUTPUT
baslangıc degerlerni griniz:


y(1):2

z(1)0

h:0.1

üst sınır degri:0

alt sınır degeri5

ikinci türev degeri=3.127871>>

9 Ocak 2010 Cumartesi

integral bulmada sympson 1/3 kuralı ile sympson 3/8 kuralının beraber uygulanması

daha önce sympson 1/3 kuralını vermiştim bu kez sympson 1/3 ile 3/8 in beraber kullanılmasını  ekledim.çünkü hatırlarsanız 1/3 sadece aralık sayısı  çift olanlar için kullanılıyordu,tek olanlar için ise aşağıdaki kod geçerli olur. %kodu eklerken f fonksiyon dosyasını da eklemeyi unutmayın!!!!!
a=input('alt sını değerini girinz:');

b=input('üst sınır degerini giriniz:');

n=input('segment sayısını ggirniz:');

h=(b-a)/n;

if rem(n,2)==0

k=0;%0a atamayınca hata veriyor

p=0;

x=a:h:b;

for i=2:n %verilen n değeri çift olduğu için sympson 1/3 kuralı uygulanır

if rem(i,2)==0 %indisi çift olanlar(xin indisi 1den başladığı için kitaba göre ters oluyor)

k=k+4*f(x(i));

else %indisi tek olanalr

p=p+2*f(x(i));
end

end

I=(f(a)+f(b)+k+p)*(h/3)

syms x;

trueval=int(sin(x),a,b)

Et=trueval-I

Ea=-((((b-a)^5)/(180*n^4))*(int(sin(x),a,b)/(b-a)))

else %aralık sayısı tek ise sympson 1/3 ile 3/8 beraber kullanılır

if(n==3)%aralık 3 ise sadece sympson 3/8 uygulanır

x=a:h:b;

sum=f(x(1))+3*f(x(2))+3*f(x(3))+f(b);

I=((b-a)/8)*sum

else%aralık tek fakat 3den düyükse ilk 4 nokta için sympson 3/8 geriye kalan noktalara da sympson 1/3 uygulanır

x=a:h:b;

sum1=f(a)+f(4);

sum1=sum1+3*(f(2)+f(3));

I=(b-a)*(sum1/8)%sympson 3/8in uygulandığı kısım

sum2=f(4)+f(b);%geriye kalan noktalara sympson 1/3 uygulanır

for i=6:n

if rem(i,2)==0 %indisi çift olanlar(xin indisi 1den başladığı için kitaba göre ters oluyor)

k=k+4*f(x(i));

else %indisi tek olanalr

p=p+2*f(x(i));
end

end

sum2=sum2+k+p;

T=((b-a)/(3*n))*sum2

integral=I+T%en sonda bulunan iki integral değeri toplanır

end

end
f foNKSİYONU f.m dosyası
function y=f(x);

y=sin(x);

4 Ocak 2010 Pazartesi

DUYURU!!!!!!

arkadaşlar READMEE dergisi ocak sayısı yayınlandı.ilgililere duyrulur.
http://www.readmee.com/

sympson 1/3 yöntemi ile integral hesaplama

%sympson 1/3 kuralına göre integral heasaplama 
%sympson 1/3 kuralı n nin tek olduğu durumlarda çalışır
%f fonkisyounun kodunu ayrı bir m-file da açmak gerek


a=input('alt sını değerini girinz:');

b=input('üst sınır degerini giriniz:');

n=input('segment sayısını ggirniz:');//aralık sayısı

h=(b-a)/n;

if rem(n,2)==0;//mod görevi görüyor

else

disp('verilen n degeri gecersiz' )

n=input('yeni n degeri');

end



k=0;%0a atamayınca hata veriyor

p=0;



x=a:h:b;

for i=2:n

if rem(i,2)==0 %indisi çift olanlar(xin indisi 1den başladığı için)

k=k+4*f(x(i));

else %indisi tek olanalr

p=p+2*f(x(i));

end

end

I=(f(a)+f(b)+k+p)*(h/3)

syms x;

trueval=int(sin(x),a,b)

Et=trueval-I

Ea=-((((b-a)^5)/(180*n^4))*(int(sin(x),a,b)/(b-a)))
F FONKSİYONU
function y=f(x);
y=sin(x);
OUTPUT
alt sını değerini girinz:0

üst sınır degerini giriniz:pi
segment sayısını ggirniz:4
I =2.0046
trueval =2
Et =
-10267655424369/2251799813685248
Ea =
-7656611879816833/(576460752303423488*pi)

1 Ocak 2010 Cuma

DUYURU!!!!!!

ARKADAŞLAR C# KURSUMUZ BU HAFTA12-4 ARASI OLACAKTIR(CUMARTESİ ELEKTRİK LAB).
DUYRULUR.....................
 
Facebook

Bizi takip edin!

ESOGÜ Bilişim GünleriESOGÜ Bilişim Günleri