Programming interface

Operations on the data go with a subroutines package . INSERT, DELETE, REPLACE, COUNT, FETCH, SELECT, RELATE, NAVIGATE etc. are performed symbolically to avoid data corruption: +------------------------------------------------------+ | C | Example of code: | C Loop over all cells | Cell and Cluster | DO 100 IC1 = 1,COUTAB(Cell) | are sets, | CALL FETTAB (Cell,ID,IC1) | Cell-Energy is an | C Check that Cell is not already used in a Cluster | attribute of Cell, | C and is above initialisation threshold | Cell_Cluster is | IF (Cell_Cluster.EQ.INULL .AND. | a relationship | + Cell_Energy.GE.INITHR) THEN | | Cluster_ID = NEXT | COUTAB, FETTAB, | CALL CLUPAR (1) | INSENT, INSREL | CALL INSENT (Cluster) | are data operators | CALL INSREL(Cell,Cell_Cluster,Cluster) | | C Add this cell to the stack | NEXT and INULL | ... | are ADAMO parameters +------------------------------------------------------+