Need to know the difference

[rajabadsha]

Can anyone please tell me the difference between and the meaning of the following six statements:
1) parameter (ndsrc=100)
2) parameter (nndx=2000+2*nwtd,nndz=2000+nwtd)
3) real*4 ut(nndx,ntsrc)
4) dimension u1(nndx,nndz)
5) dimension xsrcin(ndsrc)
6) dimension ysrcin(ndsrc)

 

[xwb]

Fortran is case independent

parameter (ndsrc=100)
#define NDSRC 100

parameter (nndx=2000+2*nwtd,nndz=2000+nwtd)
#define NNDX (2000+2*NWTD)
#define NNDZ (2000+NWTD)

real*4    ut(nndx,ntsrc)
float ut[NNDX][NTSRC];

dimension u1(nndx,nndz)
float u1[NNDX][NNDZ];

dimension xsrcin(ndsrc)
float xsrcin[NDSRC];

dimension ysrcin(ndsrc)
float ysrcin[NDSRC];

if the identifier begins with letters between I and N then it defaults to being an integer.