!-------------------------------BEGIN ADD--------------------------------- !An ADD file has declarations, derived type definitions, etc. to be included at... !the top of the Client Module, followed by CONTAINS statement and then all of ... !the procedures developed by the analyst to include in the Client Module of a ... !given model. !----- !Insert model-level declarations here, if any CHARACTER(len=3),DIMENSION(1:2):: strType !To store labels of equip types (Old & New) !----- CONTAINS !the following procedures... !----- !Insert procedures here, if any !--------------------------------END ADD----------------------------------