integer M
character (len = 20) dict(50)
data dict/'gum','sin','for','cry','lug','bye','fly','ugly',
M 'each','from','work','talk','with','self',
M 'pizza','thing','feign','fiend','elbow','fault',
M 'dirty','budget','spirit','quaint','maiden',
M 'escort','pickax','example','tension','quinine',
M 'kidney','replica','sleeper','triangle',
M 'kangaroo','mahogany','sergeant','sequence',
M 'moustache','dangerous','scientist','different',
M 'quiescent','magistrate','erroneously',
M 'loudspeaker','phytotoxic','matrimonial',
M 'parasympathomimetic','thigmotropism'/
我在 Fortran 77 中获得了一些代码,我必须将其转换为 95。我知道关于 data 关键字的非常基本的东西,比如
character (len = 5) arr (5)
data arr /'aaa','bbb','ccc','ddd','eee'/
我不知道如何在单独的行上执行上述操作。我猜它与上述有关,但我无法弄清楚在这种情况下 M 的用途。