LOGICAL — Convert to logical typeLOGICAL variable to another.
     RESULT = LOGICAL(L [, KIND])
     | L | The type shall be LOGICAL. 
 | 
| KIND | (Optional) An INTEGER initialization
expression indicating the kind parameter of the result.
      | 
LOGICAL value equal to L, with a
kind corresponding to KIND, or of the default logical kind if
KIND is not given.