マクスウェルの悪魔ゲーム - tuyoiwiki @ ウィキ

http://www.geocities.jp/white_fake/maxd.html

マクスウェルの悪魔を召喚する

colx_=colx;
colx=function(i,cx){
  var v=Math.sqrt(Math.pow(moleculevx[i],2)+Math.pow(moleculevy[i],2));
  if(cx!=gatex||(vexp>v&&moleculevx[i]>0)||(vexp<v&&moleculevx[i]<0)){
    colx_(i,cx);
  }
} 

仕事の早いマクスウェルの悪魔を召喚する

for(i=0;i<moleculenum;i++){
  if(vexp<Math.sqrt(Math.pow(moleculevx[i],2)+Math.pow(moleculevy[i],2))){
    moleculex[i]=Math.random()*areax/2+areax/2;
    moleculey[i]=Math.random()*areay;
  }else{
    moleculex[i]=Math.random()*areax/2;
    moleculey[i]=Math.random()*areay;
  }
} 

分子の数を10000にする

moleculenum=1000;init(); 

早い分子をもっと早くする

for(i=0;i<moleculenum;i++){if(vexp<Math.sqrt(Math.pow(moleculevx[i],2)+Math.pow(moleculevy[i],2))){moleculevx[i]*=2;moleculevy[i]*=2;}} 

遅い分子をもっと遅くする

for(i=0;i<moleculenum;i++){if(vexp>Math.sqrt(Math.pow(moleculevx[i],2)+Math.pow(moleculevy[i],2))){moleculevx[i]/=2;moleculevy[i]/=2;}} 

全て早い分子にする

for(i=0;i<moleculenum;i++){if(vexp>Math.sqrt(Math.pow(moleculevx[i],2)+Math.pow(moleculevy[i],2))){moleculevx[i]+=vexp;moleculevy[i]+=vexp;}}