이소스 혹시 아시는분 계신가요?

PROGRAM GAME1(3)
DIMENSION INAME(3)
COMMON ACA(9),AL(9),AOE(9),BT(9),C(9),CA(2,9),CCFG(9)
COMMON CCRM(9),CS(9),CX(9),CY(2,9),DB(9),DL(9),DP(9),DV(9)
COMMON EL(9),EX(9),FC(9),FIV(9),FM(2,9),FMK(9),FOC(9),G(9)
COMMON OE(9),P(9),PM(9),PNT(9),PQ(9),PR(2,9),PS2(2,9),PV(9)
COMMON PVP(9),R(2,9),RD(9),RINV(9),RM(2,9),RME(9),SP(9)
COMMON SR(9),ST(2,9),SUN(9),T(2,9),TC(9),TX(9),VP(9),VPE(9)
COMMON W(9),XX(9),AS2(2,9),JMN(3),Z1(2),ITRAK(1)
INAME(1) = 043501B
INAME(2) = 046505B
INAME(3) = 031040B
WRITE (6,100)
READ(1,*)M,N,JZ,QTR,E,S
100 FORMAT("INPUT MODEL #, # OF TEAMS, INDUSTRY #, QUARTER, ECONOMIC &
1 SEASONAL"/"INDICES")
ITRAK = 120 + 13*(JZ-1)
WRITE(6,101)

대충 이런식의 소스인데 혹시 이 소스가 어떤 컴파일러로 동작하는지 혹시 아시는분 계신가요? 도무지 찾아도 어떤 컴파일러로 동작하는 소스인지 알수가없군요 ㅜ.ㅡ