Date in DataType isA Value end
TimeUnit isA DataType end
Time in TimeUnit isA Value end

BlueDim in Dimension with
  dimcolor col: "0,0,210"
end

OrangeDim in Dimension with
  dimcolor col: "255,90,30"
end


"2023-03-05" in Date end
"15 h" in Time end

Element ActivityType with
  attribute
   lastUpdated: Date;
   duration: Time
  potency
    BlueDim: 2;
    OrangeDim: 1
end

Element DesignCode in ActivityType with
  attribute
    duration_1: Time
  potency
    BlueDim: 1
end

DesignCode->ActivityType with
  dimension dim: BlueDim
end

Element SusanDesignsApp in DesignCode,ActivityType with
  lastUpdated lastupdate: "2023-03-05"
  duration_1 time: "15 h"
  potency
    BlueDim: 0
end

SusanDesignsApp->DesignCode 
with
  dimension dim: BlueDim
end

SusanDesignsApp->ActivityType 
with
  dimension dim: OrangeDim
end