1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML3.2 EN">
<HTML>
<HEAD> <link rel="canonical" href="http://www.mcs.anl.gov/petsc/petsc-current/docs/manualpages/Vec/VecGetArrayF90.html" />
<META NAME="GENERATOR" CONTENT="DOCTEXT">
<TITLE>VecGetArrayF90</TITLE>
</HEAD>
<BODY BGCOLOR="FFFFFF">
<div id="version" align=right><b>petsc-3.7.5 2017-01-01</b></div>
<div id="bugreport" align=right><a href="mailto:petsc-maint@mcs.anl.gov?subject=Typo or Error in Documentation &body=Please describe the typo or error in the documentation: petsc-3.7.5 v3.7.5 docs/manualpages/Vec/VecGetArrayF90.html "><small>Report Typos and Errors</small></a></div>
<A NAME="VecGetArrayF90"><H1>VecGetArrayF90</H1></A>
Accesses a vector array from Fortran90. For default PETSc vectors, <A HREF="../Vec/VecGetArrayF90.html#VecGetArrayF90">VecGetArrayF90</A>() returns a pointer to the local data array. Otherwise, this routine is implementation dependent. You MUST call <A HREF="../Vec/VecRestoreArrayF90.html#VecRestoreArrayF90">VecRestoreArrayF90</A>() when you no longer need access to the array.
<H3><FONT COLOR="#CC3333">Synopsis</FONT></H3>
<PRE>
<A HREF="../Vec/VecGetArrayF90.html#VecGetArrayF90">VecGetArrayF90</A>(<A HREF="../Vec/Vec.html#Vec">Vec</A> x,{Scalar, pointer :: xx_v(:)},integer ierr)
</PRE>
Logically Collective on <A HREF="../Vec/Vec.html#Vec">Vec</A>
<P>
<H3><FONT COLOR="#CC3333">Input Parameter</FONT></H3>
<DT><B>x </B> -vector
<br>
<P>
<H3><FONT COLOR="#CC3333">Output Parameters</FONT></H3>
<TABLE border="0" cellpadding="0" cellspacing="0">
<TR><TD WIDTH=40></TD><TD ALIGN=LEFT VALIGN=TOP><B>xx_v </B></TD><TD>- the Fortran90 pointer to the array
</TD></TR>
<TR><TD WIDTH=40></TD><TD ALIGN=LEFT VALIGN=TOP><B>ierr </B></TD><TD>- error code
</TD></TR></TABLE>
<P>
<H3><FONT COLOR="#CC3333">Example of Usage</FONT></H3>
<PRE>
<A HREF="../Sys/PetscScalar.html#PetscScalar">PetscScalar</A>, pointer :: xx_v(:)
....
call <A HREF="../Vec/VecGetArrayF90.html#VecGetArrayF90">VecGetArrayF90</A>(x,xx_v,ierr)
xx_v(3) = a
call <A HREF="../Vec/VecRestoreArrayF90.html#VecRestoreArrayF90">VecRestoreArrayF90</A>(x,xx_v,ierr)
</PRE>
<P>
If you ONLY intend to read entries from the array and not change any entries you should use <A HREF="../Vec/VecGetArrayReadF90.html#VecGetArrayReadF90">VecGetArrayReadF90</A>().
<P>
<P>
<H3><FONT COLOR="#CC3333">See Also</FONT></H3>
<A HREF="../Vec/VecRestoreArrayF90.html#VecRestoreArrayF90">VecRestoreArrayF90</A>(), <A HREF="../Vec/VecGetArray.html#VecGetArray">VecGetArray</A>(), <A HREF="../Vec/VecRestoreArray.html#VecRestoreArray">VecRestoreArray</A>(), <A HREF="../Vec/VecGetArrayReadF90.html#VecGetArrayReadF90">VecGetArrayReadF90</A>(), <A HREF="../Sys/UsingFortran.html#UsingFortran">UsingFortran</A>
<BR>
<P>
<P><B><P><B><FONT COLOR="#CC3333">Level:</FONT></B>beginner
<BR><FONT COLOR="#CC3333">Location:</FONT></B><A HREF="../../../src/vec/vec/interface/rvector.c.html#VecGetArrayF90">src/vec/vec/interface/rvector.c</A>
<BR><A HREF="./index.html">Index of all Vec routines</A>
<BR><A HREF="../../index.html">Table of Contents for all manual pages</A>
<BR><A HREF="../singleindex.html">Index of all manual pages</A>
<P><H3><FONT COLOR="#CC3333">Examples</FONT></H3>
<A HREF="../../../src/vec/vec/examples/tutorials/ex4f90.F.html">src/vec/vec/examples/tutorials/ex4f90.F.html</A><BR>
<A HREF="../../../src/ksp/ksp/examples/tutorials/ex44f.F90.html">src/ksp/ksp/examples/tutorials/ex44f.F90.html</A><BR>
<A HREF="../../../src/snes/examples/tutorials/ex5f90.F.html">src/snes/examples/tutorials/ex5f90.F.html</A><BR>
<A HREF="../../../src/snes/examples/tutorials/ex5f90t.F.html">src/snes/examples/tutorials/ex5f90t.F.html</A><BR>
</BODY></HTML>
|
