LOGICAL (L [, KIND])

在种类类型参数不相同的逻辑类型对象之间转换