From 8ea577ea75e09a604066b1b8c4bfc1f30509237f Mon Sep 17 00:00:00 2001
From: "Michael T. Wolfinger" <michael@wolfinger.eu>
Date: Tue, 30 Jan 2018 18:55:16 +0100
Subject: [PATCH] adjusted association coefficient sensu Jucker-2003

---
 scripts/crossrates.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/scripts/crossrates.pl b/scripts/crossrates.pl
index 5e77c1c..a2351fc 100755
--- a/scripts/crossrates.pl
+++ b/scripts/crossrates.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 # -*-CPerl-*-
-# Last changed Time-stamp: <2017-12-20 09:58:51 mtw>
+# Last changed Time-stamp: <2018-01-30 18:54:15 mtw>
 
 use Getopt::Long;
 use Data::Dumper;
@@ -30,7 +30,8 @@
 my $BindingBonus=0.;
 my $ymlminmap=undef;
 my $has_map=0;
-my $Aa=600;  # association/dissociation rate
+my $Aa=170000;  # association/dissociation rate sensu Jucker-2003
+                # (k_2 in table 1 and eq 5)
 
 Getopt::Long::config('no_ignore_case');
 pod2usage(-verbose => 1)