********>Bugfix 59:
Author: Scott Brozell
Date: 01/31/2006

Programs: sander

Description: Compilation of sander with MMTSB (configure -mmtsb ...)
             will fail on platforms where Fortran generates external
             names that are not the name in lowercase with a trailing
             underscore.

Fix:  apply the following patch to amber8/src/sander/mmtsb_client.c

------------------------------------------------------------------------------
*** mmtsb_client.c.orig	2006-02-03 16:12:28.831254672 -0800
--- mmtsb_client.c	2006-02-03 16:12:35.380259072 -0800
***************
*** 180,189 ****
  }
  
  
! #if defined CRAY
  void GETBIAS(double *rg, double *krg, double *rho, double *krho) {
  #else
! #if defined IBM
  void getbias(double *rg, double *krg, double *rho, double *krho) {
  #else
  void getbias_(double *rg, double *krg, double *rho, double *krho) {
--- 180,189 ----
  }
  
  
! #if defined CRAY || defined CLINK_CAPS
  void GETBIAS(double *rg, double *krg, double *rho, double *krho) {
  #else
! #if defined IBM || defined CLINK_PLAIN
  void getbias(double *rg, double *krg, double *rho, double *krho) {
  #else
  void getbias_(double *rg, double *krg, double *rho, double *krho) {
***************
*** 195,206 ****
    *krho=rhoforce;
  }
  
! #if defined CRAY
  double NEWTEMP(char *svname, char *svport, char *svid, char *jid, char *dir,
  	       double *energy, double *rg, double *rho, int *sendfiles,
  	       int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
  #else
! #if defined IBM
  double newtemp(char *svname, char *svport, char *svid, char *jid, char *dir,
  	       double *energy, double *rg, double *rho, int *sendfiles,
  	       int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
--- 195,206 ----
    *krho=rhoforce;
  }
  
! #if defined CRAY || defined CLINK_CAPS
  double NEWTEMP(char *svname, char *svport, char *svid, char *jid, char *dir,
  	       double *energy, double *rg, double *rho, int *sendfiles,
  	       int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
  #else
! #if defined IBM || defined CLINK_PLAIN
  double newtemp(char *svname, char *svport, char *svid, char *jid, char *dir,
  	       double *energy, double *rg, double *rho, int *sendfiles,
  	       int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
***************
*** 301,312 ****
  }
  
   
! #ifdef CRAY
  double NEXTCONF(char *svname, char *svport, char *svid, char *jid, char *dir,
  		double *energy, double *ecent, double *etemp, int *sendfiles,
  		int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
  #else
! #if defined IBM
  double nextconf(char *svname, char *svport, char *svid, char *jid, char *dir,
  		double *energy, double *ecent, double *etemp, int *sendfiles,
  		int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
--- 301,312 ----
  }
  
   
! #if defined CRAY || defined CLINK_CAPS
  double NEXTCONF(char *svname, char *svport, char *svid, char *jid, char *dir,
  		double *energy, double *ecent, double *etemp, int *sendfiles,
  		int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
  #else
! #if defined IBM || defined CLINK_PLAIN
  double nextconf(char *svname, char *svport, char *svid, char *jid, char *dir,
  		double *energy, double *ecent, double *etemp, int *sendfiles,
  		int lensvname, int lensvport, int lensvid, int lenjid, int lendir) {
------------------------------------------------------------------------------

Temporary workarounds: use AMBERBUILDFLAGS to define the appropriate
                       preprocessor name, e.g., make AMBERBUILDFLAGS='-DIBM'