f18
f18 copied to clipboard
Assumed-size Cray pointer not supported
pointer(p,a(*))