forums.silverfrost.com Forum Index forums.silverfrost.com
Welcome to the Silverfrost forums
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Search found 1877 matches
forums.silverfrost.com Forum Index
Author Message
  Topic: Program aborts with spurious error report
JohnCampbell

Replies: 23
Views: 636

PostForum: Support   Posted: Wed Feb 21, 2018 12:15 am   Subject:
Eddie,

With F90, the DO index is defined on exit.
I use this feature extensively, to test the type of exit.
Searching a list for an item is a typical use.
DO I = 1, num_known
if ( possibl ...
  Topic: SLINK64 diagnostics
JohnCampbell

Replies: 22
Views: 578

PostForum: 64-bit   Posted: Wed Feb 21, 2018 12:04 am   Subject: Re:
What if i forget to declare I123453423 ? ... We have better things to do ... then just stupid typos
Dan, I think you have better things to do than use I123453423 as a variable name. It looks to me th ...
  Topic: AVX required ?
JohnCampbell

Replies: 16
Views: 370

PostForum: 64-bit   Posted: Tue Feb 20, 2018 11:36 pm   Subject:
What processors are there that support 64-bit, but don't have AVX support ?
I am thinking that it is a small group, but I may be surprised.
I am equating AVX with improved performance so if you need ...
  Topic: Program aborts with spurious error report
JohnCampbell

Replies: 23
Views: 636

PostForum: Support   Posted: Fri Feb 16, 2018 3:20 am   Subject: Re:
The scope of a loop index variable in (say) a DATA statement is local to the statement (as it can be dealt with by the compiler) but the scope of a loop index variable in an input or output list is th ...
  Topic: Program aborts with spurious error report
JohnCampbell

Replies: 23
Views: 636

PostForum: Support   Posted: Thu Feb 15, 2018 2:49 pm   Subject:
mecej4,

More a complaint about how CONTAINS can disguise the scope of local and used variables from the containing routine.

Perhaps there could be a warning that an in-scope variable name confli ...
  Topic: SLINK64 diagnostics
JohnCampbell

Replies: 22
Views: 578

PostForum: 64-bit   Posted: Thu Feb 15, 2018 2:43 pm   Subject:
I am a bit lost about this IMPLICIT NONE discussion.

You can put an IMPLICIT NONE at the start of each (or some) routine.
You then have to explicitly define the type of all variables being used, b ...
  Topic: Program aborts with spurious error report
JohnCampbell

Replies: 23
Views: 636

PostForum: Support   Posted: Wed Feb 14, 2018 12:14 am   Subject:
I find the use of CONTAINS in the following code to be confusing and could be error prone.
CONTAINS

SUBROUTINE ffcn(p, fvec)

USE fit_data
IMPLICIT NONE
REAL, INTENT(IN) ...
  Topic: SLINK64 diagnostics
JohnCampbell

Replies: 22
Views: 578

PostForum: 64-bit   Posted: Sun Feb 11, 2018 11:30 pm   Subject:
Dan,

Looks to me that you have left out an "include <clearwin.ins>" from one routine. It would be good if the message identified the routine, rather than just the file.
The devils ...
  Topic: DEALLOCATE dangling Fortran Pointer
JohnCampbell

Replies: 22
Views: 586

PostForum: Support   Posted: Sat Feb 10, 2018 1:42 am   Subject: Re:
A compiler is welcome to flag these errors; it is not required to do so.
Long ago, I wrote a F77 routine to test if a string was a number by reading from the string and using iostat= to determine if ...
  Topic: Spaces and 72-character limit
JohnCampbell

Replies: 19
Views: 499

PostForum: General   Posted: Fri Feb 09, 2018 12:28 pm   Subject:
I think a good approach for /tab would be to do as gFortran has done and replicate the Intel "Tab-Format Lines" approach.

What is also necessary is that FTN95 and PLATO have the same inte ...
  Topic: Spaces and 72-character limit
JohnCampbell

Replies: 19
Views: 499

PostForum: General   Posted: Fri Feb 09, 2018 1:39 am   Subject:
Dan,

I looked in the Intel documentation and it provides a "Tab-Format Lines", which basically tabs to column 7. There are special cases for continuation, comments and statement numbers. ...
  Topic: System exception 0x40010008: FormatMessage failed
JohnCampbell

Replies: 19
Views: 658

PostForum: Support   Posted: Thu Feb 08, 2018 1:19 pm   Subject:
You could try:
If ( allocated(xx) ) then
deallocate ( xx, stat=stat )
if ( stat /= 0 ) write (*,*) 'unexpected error in deallocate XX, stat=',stat
end if

or try:
deallocate ( xx, stat ...
  Topic: Spaces and 72-character limit
JohnCampbell

Replies: 19
Views: 499

PostForum: General   Posted: Thu Feb 08, 2018 1:00 pm   Subject:
Hi Dan,
I inserted a tab before j=
I ran using gFortran 7.2.0 from PLATO and got a message
"Compiler does not allow go over 72 char" for both space and tab.

HOWEVER, there are no tab ...
  Topic: Spaces and 72-character limit
JohnCampbell

Replies: 19
Views: 499

PostForum: General   Posted: Wed Feb 07, 2018 1:37 pm   Subject:
Eddie,

I do find that real*8 is adequate, however the only computation where I did use better than real*8 has been in the orthogonalisation of eigenvectors in an iterative Eigenvector extraction so ...
  Topic: Spaces and 72-character limit
JohnCampbell

Replies: 19
Views: 499

PostForum: General   Posted: Wed Feb 07, 2018 11:44 am   Subject:
Dan,

integer(4) is standard conforming, but not portable. The kind values in gFortran are the same as the byte values (except for complex, which I don't know much about).

I prefer the non-standa ...
 
Page 1 of 126 Goto page 1, 2, 3 ... 124, 125, 126  Next
All times are GMT + 1 Hour
Jump to:  


Powered by phpBB © 2001, 2005 phpBB Group