Discussion :

[SXBnano]

Bonjour

Sauriez-vous me dire pourquoi le programme suivant fonctionne pour n allant de 1 à environ 1 040 000 et ne fonctionne plus ensuite ?

Est-ce un problème de mémoire vive ? (pour 8Mo, ce serait fâcheux !)

Merci d'avance

Bien à vous

SXBnano

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
      program prog
 
      type spmat
         integer :: n
         real(8), pointer, dimension( : ) :: e
         real(8), pointer, dimension( : ) :: f
      end type
 
      integer i,n
      type(spmat) :: AAA
 
      write(*,*) "Donnez la valeur de n"
      read(*,*) n
      AAA%n=n
      write(*,*) "n=",AAA%n
      allocate(AAA%e(n))
      allocate(AAA%f(n))
      AAA%e=AAA%f
      deallocate(AAA%e)
      deallocate(AAA%f)
 
      end program

[Ehouarn]

Bonjour,

Il peut y avoir une limite imposée au niveau du système, qu'il faut alors changer.
Sous Linux c'est la valeur de la "stack size" qu'il faut regarder (via la commande "ulimit") et augmenter.