Searched refs:ref_phi (Results 1 – 1 of 1) sorted by relevance
80 REAL(KIND=real_kind), pointer :: ref_phi(:,:,:) => NULL() local106 CALL kgen_read_real_real_kind_dim3_ptr(ref_phi, kgen_unit)112 CALL kgen_verify_real_real_kind_dim3_ptr( "phi", check_status, phi, ref_phi)