Fortran Wiki
any (changes)

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

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

Description

any(mask [, dim]) determines if any of the values in the logical array mask along dimension dim are .true..

Standard

(削除) Fortran 95 and later (削除ここまで)(追記) Fortran 95 (追記ここまで)(追記) and later (追記ここまで)

Class

Transformational function

Syntax

result = any(mask [, dim])

Arguments

• mask - the type of the argument shall be logical and it shall not be scalar.
• dim - (optional) dim shall be a scalar integer with a value that lies between one and the rank of mask.

Return value

any(mask) returns a scalar value of type logical where the kind type parameter is the same as the kind type parameter of mask. If dim is present, then any(mask, dim) returns an array with the rank of mask minus 1. The shape is determined from the shape of mask where the dim dimension is elided.

1. any(mask) is true if any element of mask is true; otherwise, it is false. It also is false if mask has zero size.

2. If the rank of mask is one, then any(mask, dim) is equivalent to any(mask). If the rank is greater than one, then any(mask, dim) is determined by applying any to the array sections.

Example

program test_any
 logical l
 l = any((/.true., .true., .true./))
 print *, l
 call section
 contains
 subroutine section
 integer a(2,3), b(2,3)
 a = 1
 b = 1
 b(2,2) = 2
 print *, any(a .eq. b, 1)
 print *, any(a .eq. b, 2)
 end subroutine section
end program test_any

Revised on April 30, 2009 20:19:45 by Jason Blevins (71.70.142.190) (1557 characters / 0.0 pages)

Edit | Back in time (1 revision) | Hide changes | History | Views: Print | TeX | Source | Linked from: Intrinsic procedures