Changeset 8325e3 in git for Singular/LIB/makedbm.lib
- Timestamp:
- Nov 10, 1997, 8:18:46 PM (26 years ago)
- Branches:
- (u'spielwiese', 'e7cc1ebecb61be8b9ca6c18016352af89940b21a')
- Children:
- 10ed18473e37be80edc0fc4f6786cc746766ab4b
- Parents:
- b0e3ad89da86cfa4974aff29db31ddf267b31e3f
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/makedbm.lib
rb0e3ad8 r8325e3 1 // $Id: makedbm.lib,v 1. 3 1997-10-08 08:57:21krueger Exp $1 // $Id: makedbm.lib,v 1.4 1997-11-10 19:18:46 krueger Exp $ 2 2 //========================================================================= 3 3 // … … 214 214 { 215 215 link l="DBM: NFlist"; 216 read(l, "A[k]");217 read(l, "D[k]");218 read(l, "E[6k]");219 read(l, "E[6k+1]");220 read(l, "E[6k+2]");221 read(l, "J[k,0]");222 read(l, "J[k,r]");223 read(l, "X[1,0]");224 read(l, "X[1,r]");225 read(l, "X[k,0]");226 read(l, "X[k,r]");227 read(l, "W[12k]");228 read(l, "W[12k+1]");229 read(l, "W[12k+5]");230 read(l, "W[12k+6]");231 read(l, "W[k,0]");232 read(l, "W[k,r]");233 read(l, "W#[k,2r-1]");234 read(l, "W#[k,2r]");235 read(l, "Y[1,r,s]");236 read(l, "Y[k,r,s]");237 read(l, "Z[1,0]");238 read(l, "Z[1,r]");239 read(l, "Z[k,r,s]");240 read(l, "Z[k,r,0]");241 read(l, "Z[k,12k+6r-1]");242 read(l, "Z[k,12k+6r]");243 read(l, "Z[k,12k+6r+1]");244 read(l, "Z[k,0]");245 read(l, "Z[k,r]");246 read(l, "Z[6k+5]");247 read(l, "Z[6k+6]");248 read(l, "Z[6k+7]");249 read(l, "Q[k,0]");250 read(l, "Q[k,r]");251 read(l, "Q[6k+4]");252 read(l, "Q[6k+5]");253 read(l, "Q[6k+6]");254 read(l, "S[12k-1]");255 read(l, "S[12k]");256 read(l, "S[k,0]");257 read(l, "S[k,r]");258 read(l, "S#[k,2r-1]");259 read(l, "S#[k,2r]");260 read(l, "S[12k+4]");261 read(l, "S[12k+5]");262 read(l, "U[12k]");263 read(l, "U[k,2r-1]");264 read(l, "U[k,2r]");265 read(l, "U[12k+4]");266 read(l, "V[1,0]");267 read(l, "V[1,r]");268 read(l, "V#[1,2r-1]");269 read(l, "V#[1,2r]");270 read(l, "T[k,r,s]");216 "A[k] = "+read(l, "A[k]"); 217 "D[k] = "+read(l, "D[k]"); 218 "E[6k] = "+read(l, "E[6k]"); 219 "E[6k+1] = "+read(l, "E[6k+1]"); 220 "E[6k+2] = "+read(l, "E[6k+2]"); 221 "J[k,0] = "+read(l, "J[k,0]"); 222 "J[k,r] = "+read(l, "J[k,r]"); 223 "X[1,0] = "+read(l, "X[1,0]"); 224 "X[1,r] = "+read(l, "X[1,r]"); 225 "X[k,0] = "+read(l, "X[k,0]"); 226 "X[k,r] = "+read(l, "X[k,r]"); 227 "W[12k] = "+read(l, "W[12k]"); 228 "W[12k+1] = "+read(l, "W[12k+1]"); 229 "W[12k+5] = "+read(l, "W[12k+5]"); 230 "W[12k+6] = "+read(l, "W[12k+6]"); 231 "W[k,0] = "+read(l, "W[k,0]"); 232 "W[k,r] = "+read(l, "W[k,r]"); 233 "W#[k,2r-1] = "+read(l, "W#[k,2r-1]"); 234 "W#[k,2r] = "+read(l, "W#[k,2r]"); 235 "Y[1,r,s] = "+read(l, "Y[1,r,s]"); 236 "Y[k,r,s] = "+read(l, "Y[k,r,s]"); 237 "Z[1,0] = "+read(l, "Z[1,0]"); 238 "Z[1,r] = "+read(l, "Z[1,r]"); 239 "Z[k,r,s] = "+read(l, "Z[k,r,s]"); 240 "Z[k,r,0] = "+read(l, "Z[k,r,0]"); 241 "Z[k,12k+6r-1]= "+read(l, "Z[k,12k+6r-1]"); 242 "Z[k,12k+6r] = "+read(l, "Z[k,12k+6r]"); 243 "Z[k,12k+6r+1]= "+read(l, "Z[k,12k+6r+1]"); 244 "Z[k,0] = "+read(l, "Z[k,0]"); 245 "Z[k,r] = "+read(l, "Z[k,r]"); 246 "Z[6k+5] = "+read(l, "Z[6k+5]"); 247 "Z[6k+6] = "+read(l, "Z[6k+6]"); 248 "Z[6k+7] = "+read(l, "Z[6k+7]"); 249 "Q[k,0] = "+read(l, "Q[k,0]"); 250 "Q[k,r] = "+read(l, "Q[k,r]"); 251 "Q[6k+4] = "+read(l, "Q[6k+4]"); 252 "Q[6k+5] = "+read(l, "Q[6k+5]"); 253 "Q[6k+6] = "+read(l, "Q[6k+6]"); 254 "S[12k-1] = "+read(l, "S[12k-1]"); 255 "S[12k] = "+read(l, "S[12k]"); 256 "S[k,0] = "+read(l, "S[k,0]"); 257 "S[k,r] = "+read(l, "S[k,r]"); 258 "S#[k,2r-1] = "+read(l, "S#[k,2r-1]"); 259 "S#[k,2r] = "+read(l, "S#[k,2r]"); 260 "S[12k+4] = "+read(l, "S[12k+4]"); 261 "S[12k+5] = "+read(l, "S[12k+5]"); 262 "U[12k] = "+read(l, "U[12k]"); 263 "U[k,2r-1]= "+read(l, "U[k,2r-1]"); 264 "U[k,2r] = "+read(l, "U[k,2r]"); 265 "U[12k+4] = "+read(l, "U[12k+4]"); 266 "V[1,0] = "+read(l, "V[1,0]"); 267 "V[1,r] = "+read(l, "V[1,r]"); 268 "V#[1,2r-1] = "+read(l, "V#[1,2r-1]"); 269 "V#[1,2r] = "+read(l, "V#[1,2r]"); 270 "T[k,r,s] = "+read(l, "T[k,r,s]"); 271 271 close(l); 272 272 }
Note: See TracChangeset
for help on using the changeset viewer.