Clicky

Fortran Wiki
shape (Rev #3, changes)

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

Showing changes from revision #2 to #3: (追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)

Description

Determines the shape of an array.

Standard

Fortran 95 and later

Class

(削除) Inquiry function (削除ここまで)(追記) Inquiry function (追記ここまで)

Syntax

result = shape(source)

Arguments

  • source - Shall be an array or scalar of any type. If source is a pointer it must be associated and allocatable arrays must be allocated.

Return value

An integer array of rank one with as many elements as source has dimensions. The elements of the resulting array correspond to the extend of source along the respective dimensions. If source is a scalar, the result is the rank one array of size zero.

Example

program test_shape
 integer, dimension(-1:1, -1:2) :: a
 write(*,*) shape(a) ! (/ 3, 4 /)
 write(*,*) size(shape(42)) ! (/ /)
end program

See also

reshape, size

category: intrinsics

Revision from May 3, 2009 22:48:50 by Jason Blevins
Forward in time (to current) | Back in time (2 more) | See current | Hide changes | History | Rollback | View: Source | Linked from: Intrinsic procedures, reshape, size, Fortran 2003 status

AltStyle によって変換されたページ (->オリジナル) /