- #1
jasonbot
- 17
- 0
Hello,
I'm trying to compile some software called MSES, its written by Mark Drela in some fortran flavour. I've successfully compiled a number of subroutines through make files but there is one subroutine giving me grief. It's called dplot.f.
It has a strage syntax I can't seem to work around:
the dollar sign after a variable name, as in nsum$, makes no sense to me. Coming from MATLAB this wouldn't be a valid variable name and in my fortran compiler (tried both f77 and gfortran) it tells me a number of different errors about invalid forms and type disagreements. Removing the dollar signs gives errors relating to invalid declarations.
Does anyone have any idea how to fix my code?
I'm trying to compile some software called MSES, its written by Mark Drela in some fortran flavour. I've successfully compiled a number of subroutines through make files but there is one subroutine giving me grief. It's called dplot.f.
It has a strage syntax I can't seem to work around:
Code:
SUBROUTINE DPLOT
INCLUDE 'STATE.INC'
INCLUDE 'MPLOT.INC'
C-----------------------------------------------------------
C Reads in data file or reference profiles and plots them
C superimposed on calculated profiles. The profiles are
C plotted in proper location on actual airfoil.
C-----------------------------------------------------------
C
CHARACTER*40 FNAME, LINE, uname
PARAMETER (IPRX=40,KPRX=240)
DIMENSION XX(KPRX), YY(KPRX)
DIMENSION APR(IPRX), XPR(IPRX), YPR(KPRX,IPRX), UPR(KPRX,IPRX)
DIMENSION YADD(IPRX), YPRFAC(IPRX), UPRFAC(IPRX)
DIMENSION DSPR(IPRX), THPR(IPRX), TSPR(IPRX)
INTEGER KK(IPRX), NXPR(IPRX)
LOGICAL LUPR, LTPR
c
parameter (jprx=isx*200)
dimension nsum$(jprx)
dimension y$(jprx), u$(jprx), uinv$(jprx), udef$(jprx)
...
the dollar sign after a variable name, as in nsum$, makes no sense to me. Coming from MATLAB this wouldn't be a valid variable name and in my fortran compiler (tried both f77 and gfortran) it tells me a number of different errors about invalid forms and type disagreements. Removing the dollar signs gives errors relating to invalid declarations.
Does anyone have any idea how to fix my code?