! This routine only prints details on the current distribtion. ! PROGRAM Details USE Precision_Model USE CUI ! Cubpack User Interface CALL CUBPACK_INFO() STOP END PROGRAM Details