From 3841c556331f1bec586fac1d7a82a3dd280b3a4a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Edoardo=20Apr=C3=A0?= Date: Wed, 15 Jul 2020 00:03:50 -0700 Subject: [PATCH] Missing parenthesis --- src/moints/sifs1.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/moints/sifs1.F b/src/moints/sifs1.F index 6930336076..9c9287e745 100644 --- a/src/moints/sifs1.F +++ b/src/moints/sifs1.F @@ -2988,7 +2988,7 @@ c & u(u0+9 ),u(u0+10),u(u0+11),u(u0+12), & u(u0+13),u(u0+14),u(u0+15),u(u0+16)) #ifndef F77 - llocl3=transfer(local3,mold,bytes_per_int/2 + llocl3=transfer(local3,mold,bytes_per_int/2) #endif p(2,i)=llocl3(1) c