From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 109787 invoked by alias); 15 Aug 2018 00:38:58 -0000 Mailing-List: contact fortran-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Post: List-Help: , Sender: fortran-owner@gcc.gnu.org Received: (qmail 109734 invoked by uid 89); 15 Aug 2018 00:38:57 -0000 Authentication-Results: sourceware.org; auth=none X-Spam-SWARE-Status: No, score=-0.0 required=5.0 tests=BAYES_20,FREEMAIL_FROM,RCVD_IN_DNSWL_NONE,SPF_PASS autolearn=ham version=3.3.2 spammy=minute, desktop, nmero, valor X-HELO: mail-oi0-f50.google.com Received: from mail-oi0-f50.google.com (HELO mail-oi0-f50.google.com) (209.85.218.50) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Wed, 15 Aug 2018 00:38:55 +0000 Received: by mail-oi0-f50.google.com with SMTP id s198-v6so36987731oih.11 for ; Tue, 14 Aug 2018 17:38:55 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=date:from:to:subject:message-id:organization:mime-version :content-transfer-encoding; bh=888MCm/XcHY4CBHiDOhDZIfbqopBW80ax+N+ymCT/pQ=; b=F5TvcV3i9pRZEfzsS2AA+rx3vN2r4uHXWaEa5suBQ+ytRBgOdM2VWIXEZOZ0p6oBWk Zc+hjzIFi0pPXDoxEC6UTY5PcNOECvceMbdku87DYX+R/3PcfWtmsJ6P4EQy6Js8fV7M twBi8lBNG5bNKsXqFB72FrOb4DRt0meJzb4EvvWmBASySeAts455u/luZF4KxAhaDOzb FkxTFxNSmah4vmYcEN5K2GXxIaulOUBQTPRj5GapYBVV0IUWlTsCC6G9Vxf0/9Ud1/wt srQUTM5upfFny4ML2oCI1FKkgZZ1BSzjeTWDZgZvDzFpkmVMKyORzNhDdJQAKrpvCXb3 uCVA== Return-Path: Received: from raspberrypi ([187.202.139.15]) by smtp.gmail.com with ESMTPSA id q18-v6sm15123651oic.18.2018.08.14.17.38.53 for (version=TLS1_2 cipher=ECDHE-RSA-CHACHA20-POLY1305 bits=256/256); Tue, 14 Aug 2018 17:38:54 -0700 (PDT) Date: Wed, 15 Aug 2018 00:38:00 -0000 From: amine awad abed To: fortran@gcc.gnu.org Subject: can you help me! Message-ID: <20180814193841.66843122@raspberrypi> MIME-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable X-SW-Source: 2018-08/txt/msg00066.txt.bz2 I HAVE mac mini with Gfortran and it works perfectly. But i install Gfortran in a Raspberry PI model b and the example of fibbonaci using allocate instruction it dose'nt work! can you help me!! thanks a lot ! EXAMPLE DE LA SUSECCION DE FIBONACCI USANDO ALLOCAT ! amine awad abed 2018 =A9 implicit none integer(kind=3D16),allocatable,dimension(:) :: fib_vals,c_vals integer, allocatable,dimension(:) :: nvals integer :: i,n write(*,*)"dame el valor de n" read *,n print 5,n 5 format("N=FAmero de Elementos. ",i3) allocate(fib_vals(n),c_vals(n),nvals(n)) open(unit=3D1, file=3D"fib_val.txt") 15 format(i3,5x,i45) fib_vals(1)=3D1 fib_vals(2)=3D2 do i=3D3,n fib_vals(i)=3Dfib_vals(i-1)+fib_vals(i-2) end do do i=3D1,n print 10,i,fib_vals(i) 10 format("El valor de fibonacci para: ",i4, " es:",i45) write(unit=3D1, fmt=3D15)i,fib_vals(i) end do close(unit=3D1) deallocate(fib_vals,c_vals,nvals) !Deallocates ARREGLOS stop end ||=3D=3D=3D Build file: "no target" in "no project" (compiler: unknown) =3D= =3D=3D| ||Warning: Nonexistent include directory '/home/pi/Desktop/fortran-raspberr= y/fibo-alloc2.os_output_dir' [-Wmissing-include-dirs]| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|5|Error: Kind 16 not sup= ported for type INTEGER | /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|15|Error: Allocate-objec= t is neither a data pointer nor an allocatable variable| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|37|Error: 'fib_vals' is= not a variable| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|20|Error: Function 'fib_= vals' has no IMPLICIT type| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|21|Error: Function 'fib_= vals' has no IMPLICIT type| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|24|Error: Function 'fib_= vals' has no IMPLICIT type| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|24|Error: Function 'fib_= vals' has no IMPLICIT type| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|28|Error: Function 'fib_= vals' has no IMPLICIT type| /home/pi/Desktop/fortran-raspberry/fibo-alloc2.f90|30|Error: Function 'fib_= vals' has no IMPLICIT type| ||=3D=3D=3D Build failed: 9 error(s), 1 warning(s) (0 minute(s), 1 second(s= )) =3D=3D=3D|