c tminfo.h -- worker and tile (tower) state arrays c used in tm.f routines c c // tile information array c integer tileInfo(4,MAXTILES), HOME,STATE,TX,TY parameter (HOME=1, STATE=2, TX=3,TY=4) c c // possible states for a tile. Actually, if >0 means ASSIGNED c to -that- numbered CM. integer DONE, READY parameter (DONE=-2, READY=-1 ) c c DONE: a tile has been created/updated as part of the current update cycle c READY: a tile is eligable for assignment of creation/update for current cycle c >0 Asigned to a cm c ==== c ==== worker status - we share the ASSIGNED interpretation with tile status, c that is: >0 ASSIGNED means assigned -that- tile number c -that- tile number. c integer nextWorkerState(MAXCM), workerState(MAXCM) integer FREE, ASLEEP parameter (FREE=-2, ASLEEP=-1) c c FREE: worker is idle, ready for task assignment c ASLEEP: worker is online but should not be assigned work c >0 Assigned work in progress c c === integer ntiles, ntx, nty, ncm integer numTilesDone, numTilesAssigned common /tminfo/ numTilesDone, numTilesAssigned, ntiles, ntx, nty, ncm common /tminfo/ tileInfo, workerState, nextWorkerState c c .. its a workers paradise. c