Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | NumColors | = | 15 | |
integer, | public, | parameter | :: | ColorNo_Text | = | 1 | |
integer, | public, | parameter | :: | ColorNo_Wall | = | 2 | |
integer, | public, | parameter | :: | ColorNo_Window | = | 3 | |
integer, | public, | parameter | :: | ColorNo_GlassDoor | = | 4 | |
integer, | public, | parameter | :: | ColorNo_Door | = | 5 | |
integer, | public, | parameter | :: | ColorNo_Floor | = | 6 | |
integer, | public, | parameter | :: | ColorNo_Roof | = | 7 | |
integer, | public, | parameter | :: | ColorNo_ShdDetBldg | = | 8 | |
integer, | public, | parameter | :: | ColorNo_ShdDetFix | = | 9 | |
integer, | public, | parameter | :: | ColorNo_ShdAtt | = | 10 | |
integer, | public, | parameter | :: | ColorNo_PV | = | 11 | |
integer, | public, | parameter | :: | ColorNo_TDDDome | = | 12 | |
integer, | public, | parameter | :: | ColorNo_TDDDiffuser | = | 13 | |
integer, | public, | parameter | :: | ColorNo_DaylSensor1 | = | 14 | |
integer, | public, | parameter | :: | ColorNo_DaylSensor2 | = | 15 | |
integer, | public, | parameter, dimension(NumColors) | :: | defaultcolorno | = | (/3, 43, 143, 143, 45, 8, 15, 195, 9, 13, 174, 143, 143, 10, 5/) | |
character(len=*), | public, | parameter, dimension(NumColors) | :: | colorkeys | = | (/'Text ', 'Walls ', 'Windows ', 'GlassDoors ', 'Doors ', 'Roofs ', 'Floors ', 'DetachedBuildingShades ', 'DetachedFixedShades ', 'AttachedBuildingShades ', 'Photovoltaics ', 'TubularDaylightDomes ', 'TubularDaylightDiffusers ', 'DaylightReferencePoint1 ', 'DaylightReferencePoint2 '/) | |
integer, | public, | parameter, dimension(NumColors) | :: | colorkeyptr | = | (/ColorNo_Text, ColorNo_Wall, ColorNo_Window, ColorNo_GlassDoor, ColorNo_Door, ColorNo_Floor, ColorNo_Roof, ColorNo_ShdDetBldg, ColorNo_ShdDetFix, ColorNo_ShdAtt, ColorNo_PV, ColorNo_TDDDome, ColorNo_TDDDiffuser, ColorNo_DaylSensor1, ColorNo_DaylSensor2/) | |
integer, | public, | dimension(NumColors) | :: | DXFcolorno | = | defaultcolorno |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | String | |||
integer, | intent(in) | :: | SetValue | |||
character(len=*), | intent(in), | optional | :: | ColorType |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | SchemeName | |||
character(len=*), | intent(in), | optional | :: | ColorType |