[MITgcm-support] problems on alpha amchine

[Hezi Gildor]

Dear Jean-Michel,

I attach diagnostics_main_init.f

it looks ok to me but still the compiler is not happy:

f77 -fpe2 -convert big_endian -r8 -extend_source -automatic -call_shared 
-notransform_loops -align dcommons -O5 -fast -tune host -inline all -c 
diagnostics_main_init.f
f90: Error: diagnostics_main_init.f, line 1686: Syntax error, found 
END-OF-STATEMENT when expecting one of: ( * :: , : ) + . - % . ** / // 
.LT. < .LE. <= .EQ. == .NE. ...
      diagUnits = DIAGS_MK_UNITS( rUnit2c
-----------------------------------------^
f90: Error: diagnostics_main_init.f, line 1693: Syntax error, found 
END-OF-STATEMENT when expecting one of: ( * :: , : ) + . - % . ** / // 
.LT. < .LE. <= .EQ. == .NE. ...
      diagUnits = DIAGS_MK_UNITS( rUnit2c
-----------------------------------------^
f90: Error: diagnostics_main_init.f, line 1756: Syntax error, found 
END-OF-STATEMENT when expecting one of: ( * :: , : ) + . - % . ** / // 
.LT. < .LE. <= .EQ. == .NE. ...
      diagUnits = DIAGS_MK_UNITS( rUnit2c
-----------------------------------------^

.
.
.
.
----------------------------------------^
gmake: *** [diagnostics_main_init.o] Error 1


thanks...., hezi.


Jean-Michel Campin wrote:

>Hi Hezi,
>
>On Sun, Dec 04, 2005 at 12:03:20PM +0100, Martin Losch wrote:
>  
>
>>Hezi,
>>
>>has someone answered you, yet?
>>
>>The first problem looks like perfect F77 syntax to me, so I have no 
>>clue why your compiler doesn't take it. Can it compile rUnit2c//'^2'? 
>>Maybe one has to define a separate character variable, assign 
>>rUnit2c//'^2/s^2' to it and then pass it to diags_mk_units? This is 
>>really stupid but have you tried to set rUnit2c = ' m' instead of 'm '?
>>    
>>
>
>I remember that few months ago, someone had the same problem
>and was related to the preprocessor (CPP) which does not like
>the double '//'.
>Can you check what is in diagnostics_main_init.f (small .f) ?
>
>Jean-Michel
>_______________________________________________
>MITgcm-support mailing list
>MITgcm-support at mitgcm.org
>http://mitgcm.org/mailman/listinfo/mitgcm-support
>  
>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: diagnostics_main_init.f
Type: text/x-fortran
Size: 81001 bytes
Desc: not available
URL: <http://mitgcm.org/pipermail/mitgcm-support/attachments/20051206/0c6c3693/attachment.bin>