1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
|
#############################################################################
##
#W remote.gd The SCSCP package Alexander Konovalov
#W Steve Linton
##
#############################################################################
#############################################################################
##
#C IsRemoteObject
##
## <#GAPDoc Label="IsRemoteObject">
##
## <ManSection>
## <Filt Name="IsRemoteObject" />
## <Description>
## This is the category of remote objects.
## </Description>
## </ManSection>
## <#/GAPDoc>
##
DeclareCategory( "IsRemoteObject", IsObject );
#############################################################################
##
## RemoteObjectsFamily
##
## <#GAPDoc Label="RemoteObjectsFamily">
##
## <ManSection>
## <Fam Name="RemoteObjectsFamily" />
## <Description>
## This is the family of remote objects.
## </Description>
## </ManSection>
## <#/GAPDoc>
##
RemoteObjectsFamily := NewFamily( "RemoteObjectsFamily" );
#############################################################################
##
#F RemoteObject( <identifier>, <hostname>, <port> )
##
DeclareGlobalFunction ( "RemoteObject" );
#############################################################################
##
#O StoreAsRemoteObjectPerSession( <Object> )
##
DeclareOperation( "StoreAsRemoteObjectPerSession", [ IsObject, IsString, IsPosInt ] );
#############################################################################
##
#O StoreAsRemoteObjectPersistently( <Object> )
#O StoreAsRemoteObject( <Object> )
##
## <#GAPDoc Label="StoreAsRemoteObject">
##
## <ManSection>
## <Func Name="StoreAsRemoteObjectPersistently" Arg="obj server port"/>
## <Func Name="StoreAsRemoteObject" Arg="obj server port"/>
## <Returns>
## remote object
## </Returns>
## <Description>
## Returns the remote object corresponding to the object created at
## <A>server</A><C>:</C><A>port</A> from the &OpenMath; representation
## of the first argument <A>obj</A>. The second form is just a synonym.
## <Example>
## <![CDATA[
## gap> s:=StoreAsRemoteObject( SymmetricGroup(3), "localhost", 26133 );
## < remote object scscp://localhost:26133/TEMPVarSCSCPLvIUUtL3 >
## ]]>
## </Example>
## </Description>
## </ManSection>
## <#/GAPDoc>
##
DeclareOperation( "StoreAsRemoteObjectPersistently", [ IsObject, IsString, IsPosInt ] );
DeclareSynonym( "StoreAsRemoteObject", StoreAsRemoteObjectPersistently );
#############################################################################
##
#O RetrieveRemoteObject( <RemoteObject> )
##
## <#GAPDoc Label="RetrieveRemoteObject">
##
## <ManSection>
## <Func Name="RetrieveRemoteObject" Arg="remoteobject"/>
## <Returns>
## object
## </Returns>
## <Description>
## This function retrieves the remote object from the remote service
## in the &OpenMath; format and constructs it locally. Note, however,
## that for a complex mathematical object its default &OpenMath;
## representation may not contain all information about it which was
## accumulated during its lifetime on the &SCSCP; server.
## <Example>
## <![CDATA[
## gap> RetrieveRemoteObject(s);
## Group([ (1,2,3), (1,2) ])
## ]]>
## </Example>
## </Description>
## </ManSection>
## <#/GAPDoc>
##
DeclareOperation( "RetrieveRemoteObject", [ IsRemoteObject ] );
#############################################################################
##
#O UnbindRemoteObject( <RemoteObject> )
##
## <#GAPDoc Label="UnbindRemoteObject">
##
## <ManSection>
## <Func Name="UnbindRemoteObject" Arg="remoteobject"/>
## <Returns>
## <K>true</K> or <K>false</K>
## </Returns>
## <Description>
## Removes any value currently bound to the global variable
## determined by <A>remoteobject</A> at the &SCSCP; server,
## and returns <K>true</K> or <K>false</K> dependently on
## whether this action was successful or not.
## <Example>
## <![CDATA[
## gap> UnbindRemoteObject(s);
## true
## ]]>
## </Example>
## </Description>
## </ManSection>
## <#/GAPDoc>
##
DeclareOperation( "UnbindRemoteObject", [ IsRemoteObject ] );
###########################################################################
##
#E
##
|
