gfortran documents the intrinsic extension functions AND, OR, and
XOR. However, the documentation gives the impression that it
permits mixed-mode operations between INTEGER and LOGICAL types.
Also it doesn't emphasize that the functions are not elemental.

C:\gfortran\test\intrinsics>type logical1.f90
program L
write(*,*) and(3_1,[1,2,3,4])
write(*,*) and(.TRUE._1, 1_1)
end program L

C:\gfortran\test\intrinsics>gfortran logical1.f90 -ological1
logical1.f90:2.22:

write(*,*) and(3_1,[1,2,3,4])
1
Error: 'j' argument of 'and' intrinsic at (1) must be a scalar
logical1.f90:3.27:

write(*,*) and(.TRUE._1, 1_1)
1
Error: 'i' and 'j' arguments of 'and' intrinsic at (1) must have the same
type

Hi!

I am experiencing a problem with a simple multithread program and
WindowsXP.

The program is as follows. It doesn't do nothing, because I'm just
testing and learning the OpenMP directives.

program test
use omp_lib
implicit none
integer :: i,j
integer, parameter :: n=361
double precision :: a(n,n), b(n,n)

call omp_set_num_threads(2)

HI,

I‘d like to determine whether or not there exists a directory.

How could I do this job in Fortran?

It seems the INQUIRE can only be used for file inquiry, rather than
directory.

Any comments?

Thank you.
Ziven

Hello,

I have the folowing problem :

My data file contains one or more blocks composed of a title and a set
of numerical data. After one block it reads an other:

how to stop the calculation if I encounter a line of numerical data
instead of a title. I consider a title as it contains at least one non
numerical character (for example Case Nr3 a=1.2, b=6., c=80.)

Thanks for your help

Bernard Bru