LOGICAL, INTENT(IN) :: CMN_Alloc ! Do CMN allocations? If you skip GC_Allocate_All, use this LOGICAL, INTENT(IN) :: GC_Alloc ! Do other allocations? Not in init ! a pass of GC_Allocate_All and GC_Init ...