@@ -182,7 +182,7 @@ summarized below:
182
182
| ` clear ` | subroutine| sets a sequence of one or more bits to 0|
183
183
| ` flip ` | subroutine| flips the value of a sequence of one or more bits|
184
184
| ` from_string ` | subroutine| reads the bitset from a string treating it as a binary literal|
185
- | ` init ` | subroutine| creates a new bitset of size ` bits ` with no bits set|
185
+ | ` init ` | subroutine| creates a new bitset of size ` bits ` with no bits set|
186
186
| ` input ` | subroutine| reads a bitset from an unformatted I/O unit|
187
187
| ` none ` | function| ` .true. ` if no bits are 1, ` .false. ` otherwise|
188
188
| ` not ` | subroutine| performs a logical ` not ` operation on all the bits|
@@ -201,7 +201,7 @@ The procedures with two arguments of type `bitset_large` or
201
201
prevents them from being methods. The bitwise "logical" procedures,
202
202
` and ` , ` and_not ` , ` or ` , and ` xor ` also require that the two bitset
203
203
arguments have the same number of bits, otherwise the results are
204
- undefined, These procedures are summarized in the following table:
204
+ undefined. These procedures are summarized in the following table:
205
205
206
206
| Procedure name| Class| Summary|
207
207
| --------------| -----| -------|
@@ -368,7 +368,7 @@ corresponding negation of the bits in `set2`.
368
368
369
369
` set2 ` : shall be a scalar expression of the same type as ` set1 ` . It is
370
370
an ` intent(in) ` argument. Note that it should also have the same
371
- number of bits as ` set1 ` otherwise the result is undefined.
371
+ number of bits as ` set1 ` , otherwise the result is undefined.
372
372
373
373
#### Example
374
374
@@ -876,7 +876,7 @@ access positioned at the start of a BITSET value written by a
876
876
877
877
` status ` (optional): shall be a scalar default integer variable. If
878
878
present its value shall be of one of the error codes defined in this
879
- module. IF absent and it would have had a value other than ` success `
879
+ module. If absent and it would have had a value other than ` success `
880
880
processing will stop with an informative stop code. Allowed error code
881
881
values for this ` status ` are:
882
882
@@ -1030,7 +1030,7 @@ Experimental
1030
1030
1031
1031
Replaces the original bits of ` set1 ` with the bitwise ` or ` of those
1032
1032
bits with the bits of ` set2 ` . Note ` set1 ` and ` set2 ` must have the
1033
- samee number of bits, otherwise the result is undefined.
1033
+ same number of bits, otherwise the result is undefined.
1034
1034
1035
1035
#### Syntax
1036
1036
0 commit comments