> The obvious option is then to change your STRUCTUREs (which are not
> standard F90) into derived types (standard F90), viz.
>
> INTEGER A, B, C
> COMMON / COMBLK / A, B, C
>
> type :: RECBLK
> sequence
> INTEGER A, B, C
> END type recblk
>
> type (recblk) :: REC
>
> EQUIVALENCE ( A, REC)
>
> but that might be a lot of work in your case. If you have a lot of
> STRUCTUREs, you might want to have a look at perl.
>
> Matthijs van Waveren
> Fujitsu European Centre for IT
>
>
There is a Bourne-shell script to do the structure conversion:
http://www.soton.ac.uk/~fortran/tools/f77tof90/f77tof90.html
--
David Adams
Computing Services
University of Southampton
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|