Fortran

parameter inconsistency (now adjustable dimensions of arguments)
On 5/20/2010 8:30 AM, Gordon Sande wrote: <--- CUT ---> One of the issues was what happened if the value of the adjustable dimension was changed during execution of the subroutine. <--- CUT ---> I have a copy of the IBM VS Fortran Rel.1.1 Reference Manual, dated 1982. It claims to be Fortran 77 + IBM ex... 21 May 2010 02:59

parameter incosistency
Maybe a naive question, but why do we need when in main program !************ integer, parameter :: n=100 real, dimension(n) :: my_array end !************ but when in a subroutine !************ subroutine my_subroutine(n,array) integer, intent(in) :: n real, dimension(n), intent(inout) :: array <snip som... 21 May 2010 21:37

Clarify An Old Question: define a user data containing array with dimensions decided in running time
On 2010-05-18 22:51:21 -0300, Hifi-Comp <wenbinyu.heaven(a)gmail.com> said: My original question was not clear and get sidetracked. Hence I am trying to clarify the question: Currently I have the following: INTEGER,PARAMETER:: n=3 TYPE,PUBLIC:: User_Data REAL(DBL_AD)::scale ... 20 May 2010 21:35

reshape efficiency
Does anybody know whether 'reshape' is always a copy function or is this compiler-specific. let's consider the following example: program PROG real, dimension(:,:,:,:),allocatable :: A integer ::D D=... allocate( A(D,D,D,D)) A(:,:,:,:) = ... call PROCA(reshape( A, (/D**2, D**2/))) contains... 20 May 2010 01:55

Clarify An Old Question: define a user data containing array with ?dimensions decided in running time
Hifi-Comp <wenbinyu.heaven(a)gmail.com> wrote: My original question was not clear and get sidetracked. Hence I am trying to clarify the question: Currently I have the following: INTEGER,PARAMETER:: n=3 TYPE,PUBLIC:: User_Data REAL(DBL_AD)::scale REAL(DBL_AD)::vector(n) END T... 19 May 2010 00:41

reasons for failure
I've been trying to develop a 64-bit gfortran capability and was hopeful that techniques I had been using would work on a friend's laptop, but I think I failed. Am I correct to think that if I had 64-bit processing, then qp_preferred would be positive: E:\fortran_stuff>type test1.f90 implicit none integ... 25 May 2010 09:05

Clarify An Old Question: define a user data containing array with dimensions decided in running time
Hifi-Comp <wenbinyu.heaven(a)gmail.com> wrote: Richard suggested to change the type definition as follows TYPE,PUBLIC:: User_Data REAL(DBL_AD)::scale REAL(DBL_AD),ALLOCATABLE::vector(:) END TYPE User_Data However, I don't want to insert allocate statement for each variables of U... 20 May 2010 01:55

Clarify An Old Question: define a user data containing arraywith dimensions decided in running time
On 5/18/2010 9:10 PM, Hifi-Comp wrote: So you are saying there is no way in Fortran to accomplish what I intended to do: changing the original global constant n, which used to define the dimension of the array, into a user input one, with minimized change to the original code. On May 18, 9:56 pm, s... 19 May 2010 23:45

Clarify An Old Question: define a user data containing array with dimensions decided in running time
My original question was not clear and get sidetracked. Hence I am trying to clarify the question: Currently I have the following: INTEGER,PARAMETER:: n=3 TYPE,PUBLIC:: User_Data REAL(DBL_AD)::scale REAL(DBL_AD)::vector(n) END TYPE User_Data TYPE(User_Data):: x, y(30),z(100,10) In the... 19 May 2010 23:45

F2003 Standard question to constructors (type name = generic name)
Hi all, the Fortran 2003 standard (and the Fortran 2008 FDIS) permit that a type name is the same as a generic name, allowing to write a "constructor" to use a term from other programming languages. In words of the standard: "12.3.2 Specification of the procedure interface" [...] "A generic name may be the ... 18 May 2010 14:45