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 derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
numerical constant definition does not work !
... thank you, this did the trick ... :-))))))))))))) -
numerical constant definition does not work !
... I'm happy with the behaviour of the read statement, the problem is the output of the real_variable = 3.14159265358979 which should give 3.14159265358979 but instead it gives 3.14159274101257 ... ??? -
numerical constant definition does not work !
hello everybody, during an intense programming session I stumbled accross a very strange problem. Have a look at the following simple program: program test implicit none real(kind(1.0d0)), parameter :: real_const = 3.14159265358979 real(kind(1.0d0)) :: real_variable real(kind(1.0d0)) ... -
equivalence of nested do and nested forall
... forall is a fortran 95 statement ... FORALL (i=1:n, j=1:m, a(i,j) /= 0.0 ) a(i,j) = 1.0 / a(i,j) END FORALL ... is equivalent to ... DO i = 1, n DO j = 1,m IF ( a(i,j) /= 0) THEN a(i,j) = 1.0 / a(i,j) ENDIF ENDDO ENDDO ... the order of executing the statements... -
equivalence of nested do and nested forall
hello everybody, ... I am new to fortran and I would like to implement a function/subroutine wich performes the direct matrix product ... ! ! The following nested do loops are used to ! calculate the direct product of two square ! matrices. This calculation is based on the following... -
derived data type with allocatable element
hi, i would like to implement a derived data type for square matrices. the dimension of the square matrices are not known at compilation time ... so i used allocatable arrays and implemented some basic new and delete functions ... see below ... my problem is that i would like to implement an...
