AMBER Archive (2009)

Subject: Re: [AMBER] problem building sander.apbs

From: Oliver Kuhn (oak.amber_at_web.de)
Date: Mon Sep 21 2009 - 09:03:34 CDT


> -----Ursprüngliche Nachricht-----
> Von: "case" <case_at_biomaps.rutgers.edu>
> Gesendet: 21.09.09 13:41:36
> An: AMBER Mailing List <amber_at_ambermd.org>
> Betreff: Re: [AMBER] problem building sander.apbs

> On Mon, Sep 21, 2009, Oliver Kuhn wrote:
>
> > IF (apbs_debug > 1) WRITE(6, '(a, i)') ' iAPBS> apbs return code: ', rc
> > 1
> > Error: Nonnegative width required in format string at (1)
>
> For some compilers, you have to put a digit before the "i" in the format
> string. Here is a patch:
>
> diff -u -r10.1 apbs.f
> --- apbs.f 22 Aug 2009 02:18:15 -0000 10.1
> +++ apbs.f 21 Sep 2009 11:37:47 -0000
> @@ -576,7 +576,7 @@
> apbsqfx, apbsqfy, apbsqfz, apbsibx, apbsiby, apbsibz, &
> apbsnpx, apbsnpy, apbsnpz, apbsdbx, apbsdby, apbsdbz)
>
> - IF (apbs_debug > 1) WRITE(6, '(a, i)') ' iAPBS> apbs return code: ', rc
> + IF (apbs_debug > 1) WRITE(6, '(a, 6i)') ' iAPBS> apbs return code: ', rc
> IF (rc > 0) THEN
> WRITE(6, '(a)') 'iAPBS Bomb: apbs failed'
> CALL mexit(6,1)
> @@ -799,7 +799,7 @@
> apbsnpx, apbsnpy, apbsnpz, apbsdbx, apbsdby, apbsdbz)
>
>
> - IF (apbs_debug > 2) WRITE(6, '(a, i)') &
> + IF (apbs_debug > 2) WRITE(6, '(a, 6i)') &
> 'iAPBS: apbs return code: ', rc
> IF (rc > 0) THEN
> WRITE(6, '(a)') 'iAPBS Bomb: apbs failed'
> @@ -872,7 +872,7 @@
> apbsqfx, apbsqfy, apbsqfz, apbsibx, apbsiby, apbsibz, &
> apbsnpx, apbsnpy, apbsnpz, apbsdbx, apbsdby, apbsdbz)
>
> - IF (apbs_debug > 2) WRITE(6, '(a, i)') &
> + IF (apbs_debug > 2) WRITE(6, '(a, 6i)') &
> 'iAPBS: apbs return code: ', rc
> IF (rc > 0) THEN
> WRITE(6, '(a)') 'iAPBS Bomb: apbs failed'
>
> ...dac
>

I'm sorry. It still doesn't work.
1. Applying the (pasted) patch gives me a 'malformed error' and I cannot reconstruct the formatting.
2. I also manually changed the i three times to 6i and get the same error message.
Could you please send me the patch as a file?

>
> _______________________________________________
> AMBER mailing list
> AMBER_at_ambermd.org
> http://lists.ambermd.org/mailman/listinfo/amber
>

________________________________________________________________
Neu: WEB.DE Doppel-FLAT mit Internet-Flatrate + Telefon-Flatrate
für nur 19,99 Euro/mtl.!* http://produkte.web.de/go/02/

_______________________________________________
AMBER mailing list
AMBER_at_ambermd.org
http://lists.ambermd.org/mailman/listinfo/amber