← Back to branch summary

~ubuntu-branches/ubuntu/precise/bioperl/precise

« back to all changes in this revision

Viewing changes to t/Tools/pICalculator.t

  • Committer: Bazaar Package Importer
  • Author(s): Ilya Barygin
  • Date: 2010-01-27 22:48:22 UTC
  • mfrom: (3.1.4 squeeze)
  • Revision ID: james.westby@ubuntu.com-20100127224822-ebot4qbrjxcv38au
Tags: 1.6.1-1ubuntu1
* Merge from Debian testing, remaining changes:
  - disable tests, they produce a FTBFS trying to access the network 
    during run.

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/Tools/pICalculator.t
1
1
# -*-Perl-*- Test Harness script for Bioperl
2
 
# $Id: pICalculator.t 15112 2008-12-08 18:12:38Z sendu $
 
2
# $Id: pICalculator.t 15505 2009-02-05 18:22:58Z cjfields $
3
3
 
4
4
use strict;
5
5
 
23
23
ok $calc->seq($seq);
24
24
ok my $iep = $calc->iep;
25
25
for ( my $x = 0 ; $x <= 14 ; $x += .5 ) {
26
 
   is ($calc->charge_at_pH($x),$results[(2 * $x)]);
 
26
   float_is($calc->charge_at_pH($x), $results[(2 * $x)]);
27
27
}
28
28
is ($calc->iep,8.54);