Re: [BLACKBOX] Type transfer

From: [at]} <Robert>
Date: Fri, 14 Oct 2011 13:26:18 +0100

----boundary-LibPST-iamunique-1685673045_-_-
Content-type: text/plain

Yes, but ....

What I want to do is

   r := n * n

and if I don't convert before the assignment I risk overflow.

Cheers

Robert


On 14/10/2011 12:30 PM, Rene A. Krywult wrote:
> MODULE PrivConv;
> VAR r:REAL; n:INTEGER;
> BEGIN
> n:=5;
> r:=n;
> END PrivConv.
>
> -------- Original-Nachricht --------
>> Datum: Fri, 14 Oct 2011 12:23:29 +0100
>> Von: "Campbell, Robert (SELEX GALILEO, UK)"<robert.d.campbell{([at]})nowhere.xy
>> An: BLACKBOX{([at]})nowhere.xy
>> Betreff: [BLACKBOX] Type transfer
>> My mind has suddenly gone blank!
>>
>>
>> What is the easiest way of converting an INTEGER (say n) to a REAL?
>>
>> The expression "(n + 0.)" just seems a bit unnatural.
>>
>>
>> Cheers
>>
>> Robert
>> SELEX Galileo Ltd
>> Registered Office: Sigma House, Christopher Martin Road, Basildon, Essex
>> SS14 3EL
>> A company registered in England& Wales. Company no. 02426132
>> ********************************************************************
>> This email and any attachments are confidential to the intended
>> recipient and may also be privileged. If you are not the intended
>> recipient please delete it from your system and notify the sender.
>> You should not copy it or use it for any purpose nor disclose or
>> distribute its contents to any other person.
>> ********************************************************************
>>
>>
>> ----
>> To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to
>> LISTSERV{([at]})nowhere.xy

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-1685673045_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIFllcywgYnV0IC4uLi5ccGFyDQpccGFyDQpXaGF0
IEkgd2FudCB0byBkbyBpc1xwYXINClxwYXINCiAgIHIgIDo9ICBuICogblxwYXINClxwYXINCmFu
ZCBpZiBJIGRvbid0IGNvbnZlcnQgYmVmb3JlIHRoZSBhc3NpZ25tZW50IEkgcmlzayBvdmVyZmxv
dy5ccGFyDQpccGFyDQpDaGVlcnNccGFyDQpccGFyDQpSb2JlcnRccGFyDQpccGFyDQpccGFyDQpP
biAxNC8xMC8yMDExIDEyOjMwIFBNLCBSZW5lIEEuIEtyeXd1bHQgd3JvdGU6XHBhcg0KPiBNT0RV
TEUgUHJpdkNvbnY7XHBhcg0KPiBWQVIgcjpSRUFMOyBuOklOVEVHRVI7XHBhcg0KPiBCRUdJTlxw
YXINCj4gXHRhYiBuOj01O1xwYXINCj4gXHRhYiByOj1uO1xwYXINCj4gRU5EIFByaXZDb252Llxw
YXINCj5ccGFyDQo+IC0tLS0tLS0tIE9yaWdpbmFsLU5hY2hyaWNodCAtLS0tLS0tLVxwYXINCj4+
IERhdHVtOiBGcmksIDE0IE9jdCAyMDExIDEyOjIzOjI5ICswMTAwXHBhcg0KPj4gVm9uOiAiQ2Ft
cGJlbGwsIFJvYmVydCAoU0VMRVggR0FMSUxFTywgVUspIjxyb2JlcnQuZC5jYW1wYmVsbEBTRUxF
WEdBTElMRU8uQ09NPlxwYXINCj4+IEFuOiBCTEFDS0JPWEBMSVNUUy5PQkVST04uQ0hccGFyDQo+
PiBCZXRyZWZmOiBbQkxBQ0tCT1hdIFR5cGUgdHJhbnNmZXJccGFyDQo+PiBNeSBtaW5kIGhhcyBz
dWRkZW5seSBnb25lIGJsYW5rIVxwYXINCj4+XHBhcg0KPj5ccGFyDQo+PiBXaGF0IGlzIHRoZSBl
YXNpZXN0IHdheSBvZiBjb252ZXJ0aW5nIGFuIElOVEVHRVIgKHNheSBuKSB0byBhIFJFQUw/XHBh
cg0KPj5ccGFyDQo+PiBUaGUgZXhwcmVzc2lvbiAiKG4gKyAwLikiIGp1c3Qgc2VlbXMgYSBiaXQg
dW5uYXR1cmFsLlxwYXINCj4+XHBhcg0KPj5ccGFyDQo+PiBDaGVlcnNccGFyDQo+PlxwYXINCj4+
IFJvYmVydFxwYXINCj4+IFNFTEVYIEdhbGlsZW8gTHRkXHBhcg0KPj4gUmVnaXN0ZXJlZCBPZmZp
Y2U6IFNpZ21hIEhvdXNlLCBDaHJpc3RvcGhlciBNYXJ0aW4gUm9hZCwgQmFzaWxkb24sIEVzc2V4
XHBhcg0KPj4gU1MxNCAzRUxccGFyDQo+PiBBIGNvbXBhbnkgcmVnaXN0ZXJlZCBpbiBFbmdsYW5k
JiAgV2FsZXMuICBDb21wYW55IG5vLiAwMjQyNjEzMlxwYXINCj4+ICoqKioqKioqKioqKioqKioq
KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqXHBhcg0K
Pj4gVGhpcyBlbWFpbCBhbmQgYW55IGF0dGFjaG1lbnRzIGFyZSBjb25maWRlbnRpYWwgdG8gdGhl
IGludGVuZGVkXHBhcg0KPj4gcmVjaXBpZW50IGFuZCBtYXkgYWxzbyBiZSBwcml2aWxlZ2VkLiBJ
ZiB5b3UgYXJlIG5vdCB0aGUgaW50ZW5kZWRccGFyDQo+PiByZWNpcGllbnQgcGxlYXNlIGRlbGV0
ZSBpdCBmcm9tIHlvdXIgc3lzdGVtIGFuZCBub3RpZnkgdGhlIHNlbmRlci5ccGFyDQo+PiBZb3Ug
c2hvdWxkIG5vdCBjb3B5IGl0IG9yIHVzZSBpdCBmb3IgYW55IHB1cnBvc2Ugbm9yIGRpc2Nsb3Nl
IG9yXHBhcg0KPj4gZGlzdHJpYnV0ZSBpdHMgY29udGVudHMgdG8gYW55IG90aGVyIHBlcnNvbi5c
cGFyDQo+PiAqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioq
KioqKioqKioqKioqKioqKioqKlxwYXINCj4+XHBhcg0KPj5ccGFyDQo+PiAtLS0tXHBhcg0KPj4g
VG8gdW5zdWJzY3JpYmUsIHNlbmQgYSBtZXNzYWdlIHdpdGggYm9keSAiU0lHTk9GRiBCTEFDS0JP
WCIgdG9ccGFyDQo+PiBMSVNUU0VSVkBMSVNUUy5PQkVST04uQ0hccGFyDQpccGFyDQpccGFyDQot
LS0tXHBhcg0KVG8gdW5zdWJzY3JpYmUsIHNlbmQgYSBtZXNzYWdlIHdpdGggYm9keSAiU0lHTk9G
RiBCTEFDS0JPWCIgdG8gTElTVFNFUlZATElTVFMuT0JFUk9OLkNIXHBhcg0KfQ==
----boundary-LibPST-iamunique-1685673045_-_---

Received on Fri Oct 14 2011 - 14:26:18 UTC