lo = logical(l [,kind]) logical,intent(in) :: l integer,intent(in) :: kind logical :: lo
l = all(mask [,dim]) logical,intent(in) :: mask(:) integer,intent(in) :: dim logical :: l
l = any(mask [,dim]) logical,intent(in) :: mask(:) integer,intent(in) :: dim logical :: l
i = count(mask [,dim]) logical,intent(in) :: mask(:) integer,intent(in) :: dim integer :: i