У меня есть программа на фортране с большим количеством операторов вроде этого:
write(0,*) '*** ERROR *** something went wrong ',i
write(0,*) '*** ERROR *** something happend in line ',i
write(0,*) '*** ERROR *** something happend in line ',i,' of file ',filename
Можно ли создать пользовательскую подпрограмму, например, log_error(msg)
, которая допускает такое же произвольное число и типы ввода, что и write
* * 1006