Problems about ALLOCATING arrays

Hi there, I tried to allocate the size of an array using 'allocatable' and 'allocate', for example as follows:

Program allo implicit none

integer, allocatable :: L(:,:) integer :: m,n

allocate (L(2,2))

L(1,1) = 0; L(1,2) = 1; L(2,1) = 2; L(2,2) = 4

do m = 1,2 do n = 1,2 print*,L(m,n) enddo enddo

end program

On my laptop, it works fine. On the PC in my office, it doesn't, and it always give me an error message saying:

Salford run-time library. Insufficent memory available for CHECK mode Fatal run-time error

I just wonder why it is not working on my PC, as it is very basic and important that we are able to allocate the size of any array. Will be grateful if anyone can explain to me what is wrong.

Thank you very much, Neoandyson

It could be that your copy of salflibc.dll has got corrupted or there may be something odd about your operating system.

1. Try re-installing (salflibc.dll in particular)

2. What is your OS (is it supported by FTN95)?

My OS is Windows XP Professional x64 Edition Version 2003 Service Pack 2

Neoandyson

I do not know if anyone has run FTN95 successfully on a 64bit operating system. It is a 32bit compiler that may or may not run under WOW on a 64bit system.

I've been running the same OS as neoandyson for a couple of months now, and apart from one little quirk with clearwin+ which ran perfectly under XP32 but not under XP64 and required a minor re-write, I've had no other problems.

In fact I tested FTN95 with my rather poor FE solver (which is pure fortran - no clearwin+) against the 64bit version of gfortran, ie. 32bit code versus 64bit code, and the 32bit FTN95 compiled version was significantly faster !

Neoandyson's code should compile and run fine without the check option.

FTN95 runs successfully on Vista 64. The WOW64 layer is very good (it has to be, virtually all Microsoft software is 32-bit)