(j3.2006) J3 interp letter ballot #23 due 25-Mar-2011

[Tobias Burnus]

Nit picking regarding F03/0124:

Unrelated to the question, but concerning the validity of the program: I 
would like to see in F03/0124 for example 3 a SEQUENCE or BIND(C) 
attributes for the types (due to C5101) and the change COMON -> COMMON. 
(Relevant quote below.)

Thanks!

Tobias

On 02/18/2011 05:31 PM, Whitlock, Stan wrote:
> NUMBER: F03/0124
> [...]
> Finally, consider
>
>    MODULE ugly1
>      TYPE t1
>        INTEGER a,b
>      END TYPE
>      INTEGER w,z
>      TYPE(t1) x
>      COMMON/c/w,x,z
>    END MODULE
>    MODULE ugly2
>      TYPE t2
>        INTEGER c,d
>      END TYPE
>      TYPE(t2) y1,y2
>      COMMON/c/y1,y2
>    END MODULE
>    BLOCK DATA
>      COMON/c/i(4)
>      DATA i/1,2,3,4/
>    END BLOCK DATA
>    PROGRAM example3