1
variable_name
1.1? (
explicit_shape_spec_list
) 1
procedure_pointer_name