Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
ADA to Fortran convertion
Hi Friends, I have an ADA function that needs to be converted to Fortran. function Sumer (Mat: in Mat_Type) return Float is Sum: Float := 0.0; begin for Row in Mat 'range (1) loop for col in Mat 'range(2) loop Sum := Sum + Mat(Row, Col); end loop; end loop...
