| 1 | ! |
|---|
| 2 | ! $Header$ |
|---|
| 3 | ! |
|---|
| 4 | C |
|---|
| 5 | C - - - - - - - - - - - - - - - - - - - - - - - - - |
|---|
| 6 | C |
|---|
| 7 | C* =clim.h= CLIM 1.1 include file |
|---|
| 8 | C Coupling Library for Interfacing Models |
|---|
| 9 | C |
|---|
| 10 | C - - - - - - - - - - - - - - - - - - - - - - - - - |
|---|
| 11 | C |
|---|
| 12 | INTEGER*4 CLIM_Void |
|---|
| 13 | C |
|---|
| 14 | INTEGER*4 CLIM_MaxMod, |
|---|
| 15 | * CLIM_MaxPort, |
|---|
| 16 | * CLIM_MaxSegments, |
|---|
| 17 | * CLIM_MaxTag, |
|---|
| 18 | * CLIM_MaxLink, |
|---|
| 19 | * CLIM_ParSize, |
|---|
| 20 | * CLIM_Clength |
|---|
| 21 | C |
|---|
| 22 | INTEGER*4 CLIM_In, CLIM_Out, CLIM_InOut |
|---|
| 23 | C |
|---|
| 24 | INTEGER*4 CLIM_Strategy, CLIM_Serial, |
|---|
| 25 | * CLIM_Apple, CLIM_Orange, CLIM_Box, |
|---|
| 26 | * CLIM_Segments, CLIM_Length, CLIM_Offset, |
|---|
| 27 | * CLIM_SizeX, CLIM_SizeY, CLIM_LdX |
|---|
| 28 | C |
|---|
| 29 | INTEGER*4 CLIM_Integer, CLIM_Real, CLIM_Double |
|---|
| 30 | C |
|---|
| 31 | INTEGER*4 CLIM_StopPvm, CLIM_ContPvm |
|---|
| 32 | C |
|---|
| 33 | INTEGER*4 CLIM_MaxCodes, CLIM_Ok, |
|---|
| 34 | * CLIM_FastExit, CLIM_BadName, CLIM_BadPort, |
|---|
| 35 | * CLIM_BadType, CLIM_DoubleDef, CLIM_NotStep, |
|---|
| 36 | * CLIM_IncStep, CLIM_IncSize, CLIM_NotClim, |
|---|
| 37 | * CLIM_TimeOut, |
|---|
| 38 | * CLIM_Pvm, CLIM_FirstCall, CLIM_PbRoute, |
|---|
| 39 | * CLIM_Group, CLIM_BadTaskId, CLIM_NoTask, |
|---|
| 40 | * CLIM_InitBuff, CLIM_Pack, CLIM_Unpack, |
|---|
| 41 | * CLIM_Down, CLIM_PvmExit |
|---|
| 42 | C |
|---|
| 43 | C-----Parameter sizes |
|---|
| 44 | C |
|---|
| 45 | PARAMETER ( CLIM_Void = 0 ) |
|---|
| 46 | PARAMETER ( CLIM_MaxMod = 8 ) |
|---|
| 47 | PARAMETER ( CLIM_MaxPort = 40 ) |
|---|
| 48 | PARAMETER ( CLIM_MaxSegments = 160 ) |
|---|
| 49 | PARAMETER ( CLIM_MaxLink = CLIM_MaxMod * CLIM_MaxPort ) |
|---|
| 50 | PARAMETER ( CLIM_ParSize = 2 * CLIM_MaxSegments + 2 ) |
|---|
| 51 | PARAMETER ( CLIM_MaxTag = 16777215 ) |
|---|
| 52 | PARAMETER ( CLIM_Clength = 32 ) |
|---|
| 53 | C |
|---|
| 54 | C-----Ports status |
|---|
| 55 | C |
|---|
| 56 | PARAMETER ( CLIM_In = 1 ) |
|---|
| 57 | PARAMETER ( CLIM_Out = 0 ) |
|---|
| 58 | PARAMETER ( CLIM_InOut = 2 ) |
|---|
| 59 | C |
|---|
| 60 | C-----Parallel distribution |
|---|
| 61 | C |
|---|
| 62 | PARAMETER ( CLIM_Strategy = 1 ) |
|---|
| 63 | PARAMETER ( CLIM_Segments = 2 ) |
|---|
| 64 | PARAMETER ( CLIM_Serial = 0 ) |
|---|
| 65 | PARAMETER ( CLIM_Apple = 1 ) |
|---|
| 66 | PARAMETER ( CLIM_Box = 2 ) |
|---|
| 67 | PARAMETER ( CLIM_Orange = 3 ) |
|---|
| 68 | PARAMETER ( CLIM_Offset = 2 ) |
|---|
| 69 | PARAMETER ( CLIM_Length = 3 ) |
|---|
| 70 | PARAMETER ( CLIM_SizeX = 3 ) |
|---|
| 71 | PARAMETER ( CLIM_SizeY = 4 ) |
|---|
| 72 | PARAMETER ( CLIM_LdX = 5 ) |
|---|
| 73 | C |
|---|
| 74 | C-----Datatypes |
|---|
| 75 | C |
|---|
| 76 | PARAMETER ( CLIM_Integer = 1 ) |
|---|
| 77 | PARAMETER ( CLIM_Real = 4 ) |
|---|
| 78 | PARAMETER ( CLIM_Double = 8 ) |
|---|
| 79 | C |
|---|
| 80 | C-----Quit parameters |
|---|
| 81 | C |
|---|
| 82 | PARAMETER ( CLIM_ContPvm = 0 ) |
|---|
| 83 | PARAMETER ( CLIM_StopPvm = 1 ) |
|---|
| 84 | C |
|---|
| 85 | C-----Error Codes |
|---|
| 86 | C |
|---|
| 87 | PARAMETER ( CLIM_MaxCodes = -21 ) |
|---|
| 88 | C |
|---|
| 89 | PARAMETER ( CLIM_Ok = 0 ) |
|---|
| 90 | PARAMETER ( CLIM_FastExit = -1 ) |
|---|
| 91 | PARAMETER ( CLIM_BadName = -2 ) |
|---|
| 92 | PARAMETER ( CLIM_BadPort = -3 ) |
|---|
| 93 | PARAMETER ( CLIM_BadType = -4 ) |
|---|
| 94 | PARAMETER ( CLIM_DoubleDef = -5 ) |
|---|
| 95 | PARAMETER ( CLIM_NotStep = -6 ) |
|---|
| 96 | PARAMETER ( CLIM_IncStep = -7 ) |
|---|
| 97 | PARAMETER ( CLIM_IncSize = -8 ) |
|---|
| 98 | PARAMETER ( CLIM_NotClim = -9 ) |
|---|
| 99 | PARAMETER ( CLIM_TimeOut = -10 ) |
|---|
| 100 | PARAMETER ( CLIM_Pvm = -11 ) |
|---|
| 101 | PARAMETER ( CLIM_FirstCall = -12 ) |
|---|
| 102 | PARAMETER ( CLIM_PbRoute = -13 ) |
|---|
| 103 | PARAMETER ( CLIM_Group = -14 ) |
|---|
| 104 | PARAMETER ( CLIM_BadTaskId = -15 ) |
|---|
| 105 | PARAMETER ( CLIM_NoTask = -16 ) |
|---|
| 106 | PARAMETER ( CLIM_InitBuff = -17 ) |
|---|
| 107 | PARAMETER ( CLIM_Pack = -18 ) |
|---|
| 108 | PARAMETER ( CLIM_Unpack = -19 ) |
|---|
| 109 | PARAMETER ( CLIM_Down = -20 ) |
|---|
| 110 | PARAMETER ( CLIM_PvmExit = -21 ) |
|---|
| 111 | C |
|---|
| 112 | C-----End of clim.h |
|---|
