C ---------------------------------------------------------------------- INTEGER FUNCTION KSHORT(net,act) C ---------------------------------------------------------------------- C - Routine called to determine the K-shortest paths in the C - network from every node (approach) to every destination node C - INCLUDED FILES: #include "dyna.inc" #include "network.inc" #include "activity.inc" C - UNMODIFIED ARGUMENTS: RECORD /Activity/ act C - MODIFIED ARGUMENTS: RECORD /Road_Network/ net C - LOCAL VARIABLES: C - FUNCTIONS CALLED: INTEGER STD_KSHORT ! function C - RETURN VALUE: ! Non-zero if there was an error C ---------------------------------------------------------------------- KSHORT = STD_KSHORT(net,act) RETURN END C ---------------------------------------------------------------------- INTEGER FUNCTION PATH_UPDATE(net,act) #include "dyna.inc" #include "network.inc" #include "activity.inc" RECORD /Road_Network/ net RECORD /Activity/ act INTEGER STD_PATH_UPDATE !function PATH_UPDATE = STD_PATH_UPDATE(net,act) RETURN END C ----------------------------------------------------------------------