1:-module(si_quantities,[]).    2units:alias(isq:breadth,isq:width).
    3units:alias(isq:arc_length,isq:path_length).
    4units:alias(isq:period,isq:period_duration).
    5units:kind(isq:angular_measure).
    6units:kind(isq:solid_angular_measure).
    7units:quantity_formula(isq:angular_measure,(isq:arc_length)/(isq:radius)).
    8units:quantity_formula(isq:solid_angular_measure,(isq:area)/(isq:radius)**2).
    9units:quantity_parent(isq:width,isq:length).
   10units:quantity_parent(isq:radius,isq:width).
   11units:quantity_parent(isq:path_length,isq:length).
   12units:quantity_parent(isq:area,(isq:length)**2).
   13units:quantity_parent(isq:angular_measure,1).
   14units:quantity_parent(isq:solid_angular_measure,1).
   15units:quantity_parent(isq:period_duration,isq:duration).
   16units:quantity_parent(isq:frequency,1/(isq:period_duration)).
   17units:quantity_parent(isq:energy,(isq:mass)*(isq:length)**2/(isq:time)**2).
   18units:quantity_parent(isq:activity,1/(isq:duration)).
   19units:quantity_parent(isq:absorbed_dose,(isq:energy)/(isq:mass)).
   20units:quantity_parent(isq:ionizing_radiation_quality_factor,1).
   21units:quantity_parent(isq:dose_equivalent,(isq:absorbed_dose)*(isq:ionizing_radiation_quality_factor))