From owner-FreeBSD-users-jp@jp.FreeBSD.org Mon Sep 12 16:32:44 2005
Received: (from daemon@localhost)
	by castle.jp.FreeBSD.org (8.11.6p2+3.4W/8.11.3) id j8C7Wi583804;
	Mon, 12 Sep 2005 16:32:44 +0900 (JST)
	(envelope-from owner-FreeBSD-users-jp@jp.FreeBSD.org)
Received: from mvs5.plala.or.jp (c158133.vh.plala.or.jp [210.150.158.133])
	by castle.jp.FreeBSD.org (8.11.6p2+3.4W/8.11.3) with ESMTP/inet id j8C7WhI83792
	for <FreeBSD-users-jp@jp.FreeBSD.org>; Mon, 12 Sep 2005 16:32:43 +0900 (JST)
	(envelope-from ilovefd@topaz.plala.or.jp)
Received: from INDIRECT64 ([150.29.116.80]) by mvs5.plala.or.jp with SMTP
          id <20050912073236.WOXJ6132.mvs5.plala.or.jp@INDIRECT64>
          for <FreeBSD-users-jp@jp.FreeBSD.org>;
          Mon, 12 Sep 2005 16:32:36 +0900
Message-ID: <001d01c5b76c$23c4d3e0$1762a8c0@INDIRECT64>
From: "gama" <ilovefd@topaz.plala.or.jp>
To: <FreeBSD-users-jp@jp.FreeBSD.org>
References: <20050904050009.10242.qmail@sus.inter7.jp><4168D222-01F6-4459-9854-1EF8CEB0105C@wallaby.mine.nu><000501c5b6c2$06c7b870$1801a8c0@koubou> <20050912.145709.07639724.kom@narihara-lab.jp>
MIME-Version: 1.0
Content-Type: text/plain;
	format=flowed;
	charset="iso-2022-jp";
	reply-type=original
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 6.00.3790.1830
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.3790.1830
Reply-To: FreeBSD-users-jp@jp.FreeBSD.org
Precedence: list
Date: Mon, 12 Sep 2005 16:25:04 +0900
X-Sequence: FreeBSD-users-jp 86960
Subject: [FreeBSD-users-jp 86960] Re: FBSD5.4/amd
 =?ISO-2022-JP?B?GyRCJE4lYSViJWohPEApOEIbKEI=?= 
Sender: owner-FreeBSD-users-jp@jp.FreeBSD.org
X-Originator: ilovefd@topaz.plala.or.jp
X-Distribute: distribute version 2.1 (Alpha) patchlevel 24e+050320

$B$K$7$`$i!w$D$/$P$G$9(B

$B>.>>MM!"$_$J$5$^!"$"$j$,$H$&$4$6$$$^$7$?!#(B

64bitOS$B$O@5>o$KF0$$$F$$$k$h$&$G$9!#(B

$BI>2A%W%m%0%i%`$^$?$O(Bmpif77$B!J(BMPICHH$B!KB&$NLdBj$N$h$&$G$9!#(B
$B2<5-%W%m%0%i%`!J%F%9%H%W%m%0%i%`(B1$B!K$G#4(BGB$BD6$NF0:n$N3NG'$r$7$^$7$?!#(B


$BLdBj$O!"A0%a!<%k$G;H$C$?(Bmpif77(mpich-1.2.6)$B$K$"$k$h$&$G!VI1Ln%Y%s%A!W$N(B
L$B%b%G%k!J(B513x257x257)$B$^$G$O%3%s%Q%$%k!#<B9T$G$-$^$9$,(BXL$B%b%G%k!J(B1025x513x513)
$B$N%3%s%Q%$%k$G%7%9%F%`@)8B$H;W$7$-%(%i!<$,=P$F$$$k$N$G$9!#(B

$B%b%G%k%5%$%:!!!!!!!!!!!!(BTOP$B$GI=<($5$l$k(BSIZE
$B#5#1#3#x#2#5#7#x#2#5#7!!!!!!#4#8#4(BM
$B#5#1#3#x#5#1#3#x#5#1#3!!!!!!#1#8#4#6(BM
$B#1#0#2#5#x#5#1#3#x#5#1#3!!!!%3%s%Q%$%kITG=!JM=A[$5$l$k%5%$%:#3#9#0#0(BM)

mpif77$B$G%3%s%Q%$%k$5$l$k%3!<%I$,#2(BGB$B$rD6$($i$l$J$$$H$$$&$3$H$J$N$G$7$g$&$+!)(B


$B%F%9%H%W%m%0%i%`#1(B

$ cat tarray.c
#include <stdio.h>
#include <stdlib.h>
#define A(i,j) a[(i)*m+(j)]

void main(void)
{
    int i,j,k,l=1000,m=1000,n=4000;
    double *a;
    a=(double *)malloc(sizeof(double)*l*m*n);
    for(k=0;k<n;k++){
    for(i=0;i<l;i++){
        for(j=0;j<m;j++){
            A(i,j)=3.24*i*j*k;
        }
    }
    }

        printf("success\n");
}

$


