00001 module def_quantities_derived_mpt 00002 use phys_constant, only : long 00003 implicit none 00004 ! -- Other derived quantities 00005 real(long), pointer :: def_quantities_derived_real_(:,:) 00006 ! 00007 end module def_quantities_derived_mpt