Here is an example of the cosinv opcode. It uses the files cosinv.orc and cosinv.sco.
Example 1. Example of the cosinv opcode.
/* cosinv.orc */
; Initialize the global variables.
sr = 44100
kr = 4410
ksmps = 10
nchnls = 1
; Instrument #1.
instr 1
irad = 0.5
i1 = cosinv(irad)
print i1
endin
/* cosinv.orc */
/* cosinv.sco */
; Play Instrument #1 for one second.
i 1 0 1
e
/* cosinv.sco */
instr 1: i1 = 1.047