Working with DNA

"; ?> "; print ""; print "Working with DNA"; print ""; print ""; print " Calculation of molecular weight in Dalton"; print " "; print ""; print "Calculation of pmol of 5'(or3')ends"; print " "; print ""; print "Conversion of µg to pmol"; print " "; print ""; print "Conversion of Pmol to µg"; print " "; print ""; //First page working with RNA print ""; print ""; print ""; print ""; print ""; print " "; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print "
Working with RNA
Calculation of molecular weight in Dalton
Calculation of pmol of 5'(or3')ends
Conversion of µg to pmol
Conversion of Pmol to µg
"; //First page working with Temperatures and Pressure print ""; print ""; print ""; print ""; print ""; print " "; print " "; print ""; print ""; print " "; print "
working with Temperatures and Pressure
Conversions Between Centigrade and Fahrenheit
From millibars (mbar) to different units
"; //Quantification of Proteins print ""; print ""; print ""; print ""; print ""; print " "; print " "; print ""; print ""; print " "; print "
Quantification of Proteins
Molar conversions for Proteins
Protein/DNA conversions (1 kb of DNA encodes 333 amino acids = 3.7 x 10 4 Da)
"; ?> "; print "

Molecular weight of DNA

"; print""; print" "; print " "; print " "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print"
Enter a sequence here
"; print " dsDNA
"; print " ssDNA "; print "
 $result Dalton
"; print "
Home
"; print "
"; print ""; //eqution1 listed below print ""; print ""; print ""; print " "; print ""; print " "; print ""; print ""; print " "; print "
MW of dsDNA = [number of basepairs] x [660 Da]
MW of ssDNA = [number of bases] x [330 Da]
"; } //second main equation starts here if($_REQUEST['id2']) { if($_REQUEST[check]=='dsdna'){ $pmol_dsDNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $pmol_dsDNA_no_of_mueg=$_REQUEST['no_of_micro']; $result=pmol_of_dsDNA($pmol_dsDNA_sequence,$pmol_dsDNA_no_of_mueg); } if($_REQUEST[check]=='ssdna'){ $pmol_ssDNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $pmol_ssDNA_no_of_mueg=$_REQUEST['no_of_micro']; $result=pmol_of_ssDNA($pmol_ssDNA_sequence,$pmol_ssDNA_no_of_mueg); } print "
"; print "

Calculation of pmol of 5'(or3')ends of DNA

"; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print ""; print " "; print ""; print " "; print " "; print "
Enter a sequence here
"; print " dsDNA
"; print " ssDNA "; print "
No of µg's
 $result
"; print "
Home
"; print ""; print "
"; //equation2 listed below print ""; print ""; print ""; print " "; print ""; print ""; print " "; print "
pmol of ends of a dsDNA molecule = 2 x 106 x µg (of dsDNA)/Nbp x 660 Da
pmol of ends of a ssDNA molecule = 1 x 106 x µg (of dsDNA)/Nbp x 330 Da
"; } //third main equation starts here if($_REQUEST['id3']) { if($_REQUEST[check]=='dsdna'){ $pmol_dsDNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $no_of_micro_dsDNA=$_REQUEST['no_of_micro']; $result=micro_to_pmol_dsDNA($pmol_dsDNA_sequence,$no_of_micro_dsDNA); } if($_REQUEST[check]=='ssdna'){ $pmol_ssDNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $no_of_micro_ssDNA=$_REQUEST['no_of_micro']; $result=micro_to_pmol_ssDNA($pmol_ssDNA_sequence,$no_of_micro_ssDNA); } print "
"; print "

Conversion of µg to pmol

"; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print ""; print " "; print " "; print ""; print " "; print " "; print "
Enter a sequence here
"; print " dsDNA
"; print " ssDNA "; print "
No of µg's :
 $result pmol
"; print "
Home
"; print ""; print "
"; //equation3 listed below print ""; print ""; print " "; print ""; print ""; print " "; print "
pmol of dsDNA = µg (of dsDNA) x 1,515/Nbp
pmol of ssDNA = µg (of ssDNA) x 3030/Nbp
"; } //last main equation starts here if($_REQUEST['id4']) { if($_REQUEST[check]=='dsdna'){ $micro_dsDNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $no_of_pmol_dsDNA=$_REQUEST['no_of_micro']; $result=pmol_to_micro_dsDNA($micro_dsDNA_sequence,$no_of_pmol_dsDNA); } if($_REQUEST[check]=='ssdna'){ $micro_ssDNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $no_of_pmol_ssDNA=$_REQUEST['no_of_micro']; $result=pmol_to_micro_ssDNA($micro_ssDNA_sequence,$no_of_pmol_ssDNA); } print "
"; print "

Conversion of pmol to µg

"; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print ""; print " "; print " "; print ""; print " "; print " "; print "
Enter a sequence here
"; print " dsDNA
"; print " ssDNA "; print "
No of pmols :
 $result µg
"; print "
Home
"; print ""; print "
"; //equation4 listed below print ""; print ""; print ""; print ""; print ""; print " "; print "
µg of dsDNA = pmol (of dsDNA) x Nbp x 6.6 x 10-4"; print "
µg of ssDNA = pmol (of dsDNA) x Nbp x 3.3 x 10-4
"; } //Working with RNA equations starts here //first equation if($_REQUEST['id5']) { $MW_ssRNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $result=MW_of_ssRNA($MW_ssRNA_sequence); print "
"; print "

Molecular weight of RNA

"; print""; print" "; print " "; print " "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print"
Enter a sequence here
 $result Dalton
"; print "
Home
"; print "
"; print "
"; //eqution1 listed below print ""; print ""; print ""; print " "; print "
MW of ssDNA = [number of basepairs] x [340 Da]
"; } //Working with RNA second equation if($_REQUEST['id6']) { $pmol_ssRNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $pmol_ssRNA_no_of_mueg=$_REQUEST['no_of_micro']; $result=pmol_of_ssRNA($pmol_ssRNA_sequence,$pmol_ssRNA_no_of_mueg); print "
"; print "

Calculation of pmol of 5'(or3')ends of RNA

"; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print ""; print " "; print ""; print " "; print " "; print "
Enter a sequence here
No of µg's :
 $result
"; print "
Home
"; print ""; print "
"; //equation listed below print ""; print ""; print ""; print " "; print "
pmol of ends of a ssRNA molecule =µg (of ssRNA)*2941/Nbp
"; } //Working with RNA third equation if($_REQUEST['id7']) { $pmol_ssRNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $pmol_ssRNA_no_of_mueg=$_REQUEST['no_of_micro']; $result=pmol_of_ssRNA($pmol_ssRNA_sequence,$pmol_ssRNA_no_of_mueg); print "
"; print "

Conversion of µg to pmol

"; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print ""; print " "; print " "; print ""; print " "; print " "; print "
Enter a sequence here
No of µg's :
 $result pmol
"; print "
Home
"; print ""; print "
"; //equation3 listed below print ""; print ""; print ""; print " "; print "
pmol of ssRNA = µg (of ssRNA) x 2914/Nbp
"; } //working with RNA last equation if($_REQUEST['id8']) { $micro_ssRNA_sequence=preg_replace('/[^ATGCYRWSKMDVHBN]/','',strtoupper($_REQUEST['sequence'])); $no_of_pmol_ssRNA=$_REQUEST['no_of_micro']; $result=pmol_to_micro_ssRNA($micro_ssRNA_sequence,$no_of_pmol_ssRNA); print "
"; print "

Conversion of pmol to µg

"; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print ""; print " "; print " "; print ""; print " "; print " "; print "
Enter a sequence here
No of pmols :
 $result µg
"; print "
Home
"; print ""; print "
"; //equation4 listed below print ""; print ""; print ""; print " "; print "
µg of ssDNA = pmol (of ssRNA) x Nbp x 3.4 x 10-4
"; } //First page working with Temperatures and Pressure first equation if($_REQUEST['id9']) { if($_REQUEST[check]=='CtoF'){ $centigrade=$_REQUEST['value']; $result=centi_to_fahren($centigrade); } if($_REQUEST[check]=='FtoC'){ $fahren=$_REQUEST['value']; $result=farhen_to_centi($fahren); } print "
"; print "

Conversions Between Centigrade and Fahrenheit

"; print""; print" "; print " "; print" "; print" "; print" "; print" "; //print " "; print " "; print" "; print" "; print" "; print " "; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print"
Enter the value :
"; print " From Centigrade to Fahrenheit
"; print " From Fahrenheit to Centigrade"; print "
 $result
"; print "
Home
"; print "
"; print "
"; //eqution1 listed below print ""; print ""; print ""; print " "; print ""; print " "; print ""; print ""; print " "; print "
F° = 32 + (C° x 0.555)
C° = 0.555 x (F°-32)
"; } //First page working with Temperatures and Pressure Second equation if($_REQUEST['id10']) { switch($_REQUEST[check]){ case ('mbar_mm_Hgto'): $Hg=$_REQUEST['value']; $result=mbar_to_mmHg($Hg); break; case ('mbar_inch_Hg'): $inchHg=$_REQUEST['value']; $result=mbar_to_inchHg($inchHg); break; case ('mbar_psi'): $psi=$_REQUEST['value']; $result=mbar_to_psi($psi); break; case ('mbar_atm'): $atm=$_REQUEST['value']; $result=mbar_to_atm($atm); break; case ('mbar_kPa'): $kPa=$_REQUEST['value']; $result=mbar_to_kPa($kPa); break; case ('mbar_Torr'): $torr=$_REQUEST['value']; $result=mbar_to_Torr($torr); break; } /*if($_REQUEST[check]=='mbar_mm_Hgto'){ $Hg=$_REQUEST['value']; $result=mbar_to_mmHg($Hg); //$result=centi_to_fahren($centigrade); }*/ /*if($_REQUEST[check]=='mbar_inch_Hg'){ $fahren=$_REQUEST['value']; $result=farhen_to_centi($fahren); }*/ print "
"; print "

From millibars (mbar) to different units

"; print""; print" "; print " "; print" "; print" "; print " "; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print " "; if($result==0){ print " "; }else{ print " ";} print " "; print" "; print" "; print" "; print" "; print" "; print" "; print" "; print"
Enter the value :
"; print " Millimeters of mercury (mm Hg)
Inches of mercury (inch Hg)
Pounds per square inch (psi)
Atmospheres (atm)
kilopascals (kPa)
Torrs (Torr)
 $result
"; print "
Home
"; print "
"; print "
"; //eqution1 listed below print ""; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print ""; print ""; print " "; print "
From millibars (mbar) to Millimeters of mercury (mm Hg) = mbar x 0.750000
From millibars (mbar) to Inches of mercury (inch Hg) = mbar x 0.039400
From millibars (mbar) to Pounds per square inch (psi) = mbar x 0.014500
From millibars (mbar) to Atmospheres (atm) = mbar x 0.000987
From millibars (mbar) to kilopascals (kPa) = mbar x 0.100000
From millibars (mbar) to Torrs (Torr) = mbar x 0.750000
"; } //Quantification of Proteins equations if($_REQUEST['id11']){ print "




"; print""; print "
Molar conversions for Proteins
"; //print "Molar conversions for Proteins"; print""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; //print ""; print "
100 pmol Protein µg Protein
10 kDa1
30 kDa3
100 kDa10
"; print "
Home
"; } if($_REQUEST['id12']){ print "




"; print""; print "
Protein/DNA conversions (1 kb of DNA encodes 333 amino acids = 3.7 x 10 4 Da)
"; print""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; //print ""; print "
Protein DNA
10 kDa270 bp
30 kDa810 bp
100 kDa2.7 bp
"; print "
Home
"; } } //All functions of DNA function MW_of_dsDNA($sequence){ $no_base_pair=strlen($sequence); return ($no_base_pair*660); } function MW_of_ssDNA($sequence){ $no_base_pair=strlen($sequence); return ($no_base_pair*330); } function pmol_of_dsDNA($pmol_dsDNA_sequence,$pmol_dsDNA_no_of_mueg){ $no_base_pair=strlen($pmol_dsDNA_sequence); $number_of_mueg=$pmol_dsDNA_no_of_mueg; if(!$no_base_pair || !$number_of_mueg){ return 0; }else{ return ((2*pow(10,6))*($number_of_mueg)/(($no_base_pair)*660)); } } function pmol_of_ssDNA($pmol_ssDNA_sequence,$pmol_ssDNA_no_of_mueg){ $no_base_pair=strlen($pmol_ssDNA_sequence); $number_of_mueg=$pmol_ssDNA_no_of_mueg; if(!$no_base_pair || !$number_of_mueg){ return 0; }else{ return (1*pow(10,6)*$number_of_mueg/(($no_base_pair)*330)); } } function micro_to_pmol_dsDNA($pmol_dsDNA_sequence,$no_of_micro_dsDNA){ $no_base_pair=strlen($pmol_dsDNA_sequence); $number_of_micro=$no_of_micro_dsDNA; if(!$no_base_pair || !$number_of_micro){ return 0; }else{ return (($number_of_micro*1515)/$no_base_pair);} } function micro_to_pmol_ssDNA($pmol_ssDNA_sequence,$no_of_micro_ssDNA){ $no_base_pair=strlen($pmol_ssDNA_sequence); $number_of_micro=$no_of_micro_ssDNA; if(!$no_base_pair || !$number_of_micro){ return 0; }else{ return (($number_of_micro*3030)/$no_base_pair); } } function pmol_to_micro_dsDNA($micro_dsDNA_sequence,$no_of_pmol_dsDNA){ $no_base_pair=strlen($micro_dsDNA_sequence); $number_of_micro=$no_of_pmol_dsDNA; if(!$no_base_pair || !$number_of_micro){ return 0; }else{ return ($number_of_micro*$no_base_pair*(6.6*pow(10,(-4)))); } } function pmol_to_micro_ssDNA($micro_ssDNA_sequence,$no_of_pmol_ssDNA){ $no_base_pair=strlen($micro_ssDNA_sequence); $number_of_micro=$no_of_pmol_ssDNA; if(!$no_base_pair || !$number_of_micro){ return 0; }else{ return ($number_of_micro*$no_base_pair*(3.3*pow(10,(-4)))); } } //All functions of RNA function MW_of_ssRNA($sequence){ $no_base_pair=strlen($sequence); return ($no_base_pair*340); } //same for both second & third equation function pmol_of_ssRNA($pmol_ssRNA_sequence,$pmol_ssRNA_no_of_mueg){ $no_base_pair=strlen($pmol_ssRNA_sequence); $number_of_mueg=$pmol_ssRNA_no_of_mueg; if(!$no_base_pair || !$number_of_mueg){ return 0; }else{ return (($number_of_mueg*2941)/($no_base_pair)); } } function pmol_to_micro_ssRNA($micro_ssRNA_sequence,$no_of_pmol_ssRNA){ $no_base_pair=strlen($micro_ssRNA_sequence); $number_of_micro=$no_of_pmol_ssRNA; if(!$no_base_pair || !$number_of_micro){ return 0; }else{ return ($number_of_micro*$no_base_pair*(3.4*pow(10,(-4)))); } } function centi_to_fahren($centigrade){ if(!$centigrade){ return 0; }else{ return (32+($centigrade*0.555)); } } function farhen_to_centi($fahren){ if(!$fahren){ return 0; }else{ return (0.555*($fahren-32)); } } function mbar_to_mmHg($Hg){ if(!$Hg){ return 0; }else{ return (0.750000*($Hg)); } } function mbar_to_inchHg($inchHg){ if(!$inchHg){ return 0; }else{ return (0.039400*($inchHg)); } } function mbar_to_psi($psi){ if(!$psi){ return 0; }else{ return (0.014500*($psi)); } } function mbar_to_atm($atm){ if(!$atm){ return 0; }else{ return (0.000987*($atm)); } } function mbar_to_kPa($kPa){ if(!$kPa){ return 0; }else{ return (0.100000*($kPa)); } } function mbar_to_Torr($torr){ if(!$torr){ return 0; }else{ return (0.750000*($torr)); } } function revpermin($rpm,$RCF,$R){ //return 100000000; $rcf=1.12*$R*(pow(( $rpm/1000),2) ); //print $rcf; $temp=($rcf / (1.12*$R)); print $temp; $res=1000*( sqrt($temp) ); return ($res); } ?>