Перевести программу из Fortran в с++

Помогите перевести из фортрана программу на С++ или другой язык

Вложения

фортран 111.doc (66.5 Кб, 69 просмотров)

Написано все это дело на Фортране-77, а наличие операторов вроде IF (TI > TP) позволяет предположить, что писалось под компилятор g77 - он такие штуки понимал вместо стандартного IF (TI .GT. TP). Cам по себе перевод возможен: была такая программа f2c, почитать можно в Википедии (на буржуйском). B oбщем, идете сюда и скачиваете что нужно, включая документацию. К сожалению, никогда не пользовался, и в детали вникать лень. Возможные осложнения в Вашем случае:

1. Использован нестандартный вид операторов IF (по меркам Ф-77). Но самая последняя версия f2c датируется, кажись, 2007 годом, так что для того времени это все уже было нормой. Должно прокатить.

2. Использован стандартный для Фортрана способ неявного описания переменных. Т.е. описана только часть из них, названия которых не подпадают под правило описания по умолчанию в Фортране, а с остальными компилятор должен разобраться сам. Ну, Фортран - папаша Бейсика! F2c наверняка не будет заморачиваться с описанием всех встретившихся переменных, это надо будет сделать Вам. Исходный принцип такой: если тип переменной не описан явно, то если она начинается с буковок от I до N, значит, это целое число длиной 4 байта (аналог в С - long int), со всех остальных букв, кроме C и D - это действительное число на 4 байта (аналог в С - float). Если с D - то это действительное число двойной точности на 8 байт, с С - комплексное число; такие вроде в упомянутой программе отсутствуют.

2