έχω έναν κώδικα fortran που πρέπει να μετατρέψω σε c++
Με μια πρώτη αναζήτηση βρήκα ένα πρόγραμμα (f2c) στο οποίο όμως βάζω τον κώδικα και βγάζει πολλά λάθη.
Μπορεί κάποιος που ξέρει και έχει τα εργαλεία να δει αν ο κώδικας σε fortran τρέχει σωστά ή να με βοηθήσει κάπως στο convertion?
βάζω μια υπορουτίνα που επίσης δεν μετατρέπεται
SUBROUTINE CONVAL(LL)
IMPLICIT DOUBLE PRECISION ( A-H , O-Z )
COMMON/FILTERLENGTHS/NS,NFILTERA,NFILTERD
COMMON/CONV/ cA1(100000),cA2(100000),cA3(100000),cA4(100000),cA5(100000),cA6(100000),cA7(100000),cA8(100000),cA9(100000)
COMMON/LENGTH/ L1,L2,L3,L4,L5,L6,L7,L8,L9
m=NFILTERA;
n=NS;
k=m+n-1;
j=max(1,k+1-n):min(k,m);
DO 10 f=1,k
sumb=0
DO 20 ff=1,f
if ff>m then s(ff)=0
CONTINUE
if f+1-ff>n then w(f+1-ff)=0
CONTINUE
20 CONTINUE
cA(LL)=cA(LL)+(X(ff)*FILA(f+1-ff))
10 CONTINUE
RETURN
END
βρήκα και κάτι ακόμα που δεν ξέρω πως να το τρέξω.. νομίζω χρειάζεται python, που την έχω
http://cci.lbl.gov/fable/