$ gfortran -march=native -mfpmath=sse -O2 -c random.f90
random.f90:1123.27:
INTEGER :: RVKBINOM(N)
1
Error: Symbol 'rvkbinom' at (1) already has basic type of INTEGER
random.f90:1138.27:
INTEGER :: RVPBINOM(N)
1
Error: Symbol 'rvpbinom' at (1) already has basic type of INTEGER
random.f90:1153.26:
INTEGER :: RSBINOM(N)
1
Error: Symbol 'rsbinom' at (1) already has basic type of INTEGER
random.f90:1162.8:
RSBINOM=TMP
1
Error: Incompatible ranks 0 and 1 in assignment at (1)
random.f90:1146.8:
RVPBINOM=TMP
1
Error: Incompatible ranks 0 and 1 in assignment at (1)
random.f90:1131.8:
RVKBINOM=TMP
1
Error: Incompatible ranks 0 and 1 in assignment at (1)