rsspice 0.1.0

Pure Rust port of the SPICE Toolkit for space geometry
Documentation 
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

//
// GENERATED FILE
//

use super::*;
use f2rust_std::*;

const MAXFRM: i32 = 1013;
const MAXBAS: i32 = 15000;
const LBSNGL: i32 = -5;

//$Procedure ZZSWFCLN ( Private, switch frame clean up )
pub fn ZZSWFCLN(
    HDFRAM: &mut [i32],
    FRPOOL: &mut [i32],
    BASBEG: &mut [i32],
    FRAMAT: &mut i32,
    ctx: &mut Context,
) -> f2rust_std::Result<()> {
    let mut HDFRAM = DummyArrayMut::new(HDFRAM, 1..);
    let mut FRPOOL = DummyArrayMut::new(FRPOOL, LBSNGL..);
    let mut BASBEG = DummyArrayMut::new(BASBEG, 1..);

    //
    // This routine must perform its function after an error has been
    // signaled, so it does not return upon entry after a SPICE error
    // occurs.
    //
    CHKIN(b"ZZSWFCLN", ctx)?;

    *FRAMAT = 0;

    //
    // Both of the following routines will execute even when a SPICE
    // error condition exists.
    //
    CLEARI(MAXFRM, BASBEG.as_slice_mut());
    ZZHSIINI(MAXFRM, HDFRAM.as_slice_mut(), FRPOOL.as_slice_mut(), ctx)?;

    CHKOUT(b"ZZSWFCLN", ctx)?;
    Ok(())
}