<html>
<head>
<style>
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Verdana
}
</style>
</head>
<body class='hmmessage'>
compiling passed if:<br> use parm<br> implicit real*8 (a-h,o-z)<br>#include "finclude/petsc.h"<br><br>Is this ok? Many thanks!<br><hr id="stopSpelling">From: tsjb00@hotmail.com<br>To: petsc-users@mcs.anl.gov<br>Subject: RE: fortran 90 program with PETSc<br>Date: Wed, 24 Jun 2009 22:59:06 +0000<br><br>
<style>
.ExternalClass .EC_hmmessage P
{padding:0px;}
.ExternalClass body.EC_hmmessage
{font-size:10pt;font-family:Verdana;}
</style>
Many thanks for your help! I've tried the method in your email .<br>In the main program called driver.F, it is coded:<br> program main<br> use parm<br>#include "finclude/petsc.h"<br> implicit real*8 (a-h,o-z)<br>.................................<br>I got the following error information :<br><br> In file driver.F:280<br><br> implicit none <br> 1<br> In file /home/jinbei/Soft/petsc-3.0.0-p5/include/finclude/petsc.h:209<br><br> Included at driver.F:279<br><br> <br> 2<br>Error: IMPLICIT NONE statement at (1) cannot follow data declaration statement at (2)<br><br>Would you please tell me what might be wrong?<br><br>Many thanks in advance!<br><br><br><br>> Date: Wed, 24 Jun 2009 16:59:43 -0500<br>> From: balay@mcs.anl.gov<br>> To: petsc-users@mcs.anl.gov<br>> Subject: Re: fortran 90 program with PETSc<br>> <br>> On Wed, 24 Jun 2009, tsjb00 wrote:<br>> <br>> > <br>> > Hi!<br>> <br>> > I am trying to parallelize a fortran 90 program with PETSc. The<br>> > original program uses a lot of global variables defined using<br>> > fortran 90 modules.<br>> <br>> > My question is: Can I use 'include PETSc include file' and 'use<br>> > MyModule' in the program at the same time?<br>> <br>> yes.<br>> <br>> > If so, in what sequence should I put 'include XXX', 'use XXX' and<br>> > 'implicit' statements?<br>> <br>> The following should work.<br>> <br>> use foo<br>> #include "finclude/petsc.h"<br>> implicit none<br>> <br>> <br>> > Another general question is whether I can use fortran 90 features<br>> > such as 'module' and dynamic allocation on a parallel system of<br>> > MPI-1 standard? Any reference on such programming work will be also<br>> > appreciated.<br>> <br>> I don't see why not. f90 issues you mentioned are unrelated to MPI<br>> <br>> Satish<br>> <br>> > Many thanks in advance!<br>> > <br>> > <br>> > _________________________________________________________________<br>> > 约会说不清地方？来试试微软地图最新msn互动功能！<br>> > http://ditu.live.com/?form=TL&swm=1<br><br><hr>立刻下载 MSN 保护盾，保障Messenger 安全稳定！ <a href="http://im.live.cn/safe/">现在就下载！</a><br /><hr />立刻下载 MSN 保护盾，保障Messenger 安全稳定！ <a href='http://im.live.cn/safe/' target='_new'>现在就下载！</a></body>
</html>